Kompilierungsfehler
14.11.2005 08:30:52
Gisela
beim öffnen einer Arbeitsmappe erscheint immer der Fehler "kompilierungsfehler im Modul..."
Kann mir bitte jemand helfen, was ich verändern muß,
hier das Makro:
Sub leeren5()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Sheets("cpo").Select
ActiveSheet.Unprotect ("mix1877")
Dim rng As Range
For Each rng In Range("J6:P206,B6:B206,D6:D206") '''diese Zeile ist als Fehler gelb markiert'''
If Len(Trim(rng)) = 0 Then
rng.ClearContents
End If
Next rng
Application.DisplayAlerts = True
Range("F6").Select
End Sub
Vielen Dank und Grüße
Gisela