SortField.Order (Excel)
Determina a ordem de classificação dos valores especificados na chave. Leitura/gravação. Os valores de retorno possíveis são xlAscending - Classifica o campo especificado em ordem ascendente. É o valor padrão, xlDescending - Classifica o campo especificado em ordem descendente.
ActiveSheet.Sort.SortFields(1).Order = xlAscending