Cadipas spain respondió:
Prueba esto: Range("AN3").Select Range(Selection, Selection.End(xlDown)).Sort Key1:=Range("An3"), Order1:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom Si necesitas más aclaraciones, no lo dudes. Si has...