ランク付けしてリストを作成する

Question

各会議で1位にランクされたチームを探して、別のワークシートに追加するのに役立つループが必要です。

例えばA、C、およびEはチームBとDのランクが高いにもかかわらず

Team - Conference - Rank 
A - WEST - 1 
B - WEST - 2 
C - EAST - 3 
D - EAST -4 
E - NORTH - 5 

会議勝者を選択すべきです。私は250のチームと10の会議を通してフィルタリングするループを設計する必要があります。

Answer 1

これを手動で実行したり、データをコピーしたり、会議で並べ替えたり（会議、ランク付け）、会議で重複を取り除くことができます。 VBAでそれを行う理由がある場合、これは同等です：

Sub GetFirstByConf() 
    With Worksheets.Add 
     .name = "FirstTeamByConf" 
     Worksheets("Sheet1").UsedRange.Copy .Range("A1") 
     .UsedRange.Sort key1:=.Columns("B"), key2:=.Columns("C"), header:=xlYes 
     .UsedRange.RemoveDuplicates 2 
    End With 
End Sub