ich möchte gerne, daß mein Makro eine Liste, die sich aber immer wieder erweitert, in der ersten Spalte die Einträge alpabetisch ordnet.
Vielleicht kann mir jemand bei diesem Problem helfen.
Danke
Bernd
ich möchte gerne, daß mein Makro eine Liste, die sich aber immer wieder erweitert, in der ersten Spalte die Einträge alpabetisch ordnet.
Vielleicht kann mir jemand bei diesem Problem helfen.
Danke
Bernd
Sub Makro1()
Columns("A:A").Sort Key1:=Range("A1"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Columns("A:A").Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub
Hier wird Spalte A sortiert:
Columns(1).Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Viel Spaß,
Andreas
einfach nur nur ne kleine Schleife drum ;-)
Viel Spaß,
Andreas