Фильтр по основному критерию и его вспомогательному критерию

Question

Рассмотрите таблицу с тремя столбцами A, B и C. Я хочу отсортировать эту таблицу, используя следующие два критерия.

1. Главный критерий: Сортировка всей таблицы в соответствии с столбцом C, чтобы записи в C возрастали. Например, 2009, 2009, 2010, 2010 и т.д.
2. Sub Критерий: При записи в столбце C являются такими же, скажем, 2009, я хочу, чтобы отсортировать таблицу таким образом, что записи в столбце B уменьшается. Например, если в C есть два 2009, то я хочу, чтобы B имел 100 и 99.

Как достичь этого в Excel, пожалуйста?

Answer 1

Этот код составлен с Записан Код. Начиная с данными, такими как:

Запуск этого макроса:

Sub Macro1() 
With ActiveWorkbook.Worksheets("Sheet1").Sort 
    .SortFields.Clear 
    .SortFields.Add Key:=Range("C1:C20"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal 
    .SortFields.Add Key:=Range("B1:B20"), SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal 
    .SetRange Range("A1:C20") 
    .Header = xlNo 
    .MatchCase = False 
    .Orientation = xlTopToBottom 
    .SortMethod = xlPinYin 
    .Apply 
End With 
End Sub 

произведут: