Este fórum está sendo desativado

[paparello]

Não consegui responder ao tópico anterior, porisso poste um novo.
Agradeço Babdallas mas não é disso que preciso.
Tenho que classificar os valores em ordem crescente por nome e não por ano.
De qualquer modo, já resolvi o problema.
Se alguém também tiver essa dúvida, aqui vai:
Sub ClassLinhas()
Dim myRow As Range
For Each myRow In Selection.Rows
myRow.Sort myRow.Cells(1), xlAscending, Header:=xlNo, Orientation:=xlSortRows
Next myRow
End Sub

Muito obrigado assim mesmo

[babdallas]

paparello,

desculpe, tinha entendido que a classificação era pelas colunas e não pelas linhas. Que bom que você resolveu!

Abraço