Daten sortieren
24.10.2003 10:09:26
Johannes
mit folgendem Code möchte ich Daten in einer Tabelle sortieren:
Private Sub CommandButton4_Click()
Worksheets("tab3").Columns("A:C").Sort _
Key1:=Range("A1"), Order1:=xlAscending, _
Key2:=Range("B1"), Order2:=xlAscending, _
Key3:=Range("C1"), Order3:=xlAscending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, _
Orientation:=xlTopToBottom
End Sub
Ich erhalte eine Fehlermeldung "Der Sortierbezug ist ungültig". Was ist hier falsch?
Gruß Johannes