Habe zu Hause Excel 2010.
Da läuft dieses Makro ohne Probleme. (Es sortiert mir ein Diagramm )
Sub Diagramm_Gesperrte()
Application.ScreenUpdating = False
'Range("A2:C9").Select
ActiveWorkbook.Worksheets("Auswertung").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Auswertung").Sort.SortFields.Add Key:=Range( _
"C2:C9"), SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("Auswertung").Sort
.SetRange Range("A2:C9")
.Header = xlGuess
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
Application.ScreenUpdating = True
End Sub
In der Firma Excel 2003 bekomme ich immer den Fehler in
ActiveWorkbook.Worksheets("Auswertung").Sort.SortFields.Clear
Könnte mir bitte jemand helfen?
Gruß
Heinz