Code funktioniert nicht in Excel 2000
26.01.2009 13:32:17
marc
Leider funktioniert folgender "Sortierungscode nicht" in Excel 2000 ,
weiss jemand eine Lösung?
Public Sub Vereinsmeisterschaft_A_Rangliste_sortieren()
Sheets("Vereinsmeisterschaft_A").Select
Range("B4:I53").Select
Selection.Sort Key1:=Range("I4"), Order1:=xlDescending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range("A1").Select
End Sub
Gruess