Makrorecorder hat nicht geholfen...Code anbei
25.05.2004 18:44:42
Peter
habe diesen Code zum Sortieren mit dem Makrorecorder aufgezeichnet, es tut sich aber rein gar nix?
Private Sub CommandButton6_Click()
Worksheets("Hindernislauf").Range("B2").Select
Selection.Sort Key1:=Range("K2"), Order1:=xlAscending, Key2:=Range("J2") _
, Order2:=xlAscending, Header:=xlNo, OrderCustom:=1, MatchCase:=False, _
Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, DataOption2:= _
xlSortNormal
End Sub
Wer weiß wo der Haken ist?
Danke
Peter S.