Continuação deste tópico:Drop downs de validação dinâmica de dados com classificação de vários critérios

Desejo classificar uma lista com base em vários critérios, classificá-la e, finalmente, exibi-la em uma lista suspensa de validação de dados (as listas suspensas são abordadas no tópico referido no link acima).

Como posso classificar dados com vários critérios no Excel 2016? Eu tentei usar o filtro avançado e o evento worksheetChange. Quero manipular os dados antes de classificá-los e classificá-los antes de classificá-los.

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$D$2" Then
    Range("ÄB1[#All]").AdvancedFilter Action:=xlFilterInPlace, _
                       CriteriaRange:=Range("D1:D2"), Unique:=False
End If

End Sub