ich habe ein geschütztes Tabellenblatt mit zwei Buttons, der erste soll einige Zeilen ausblenden, der zweite blendet sie wieder ein.
Private Sub CommandButton1_Click()
ActiveSheet.Unprotect
Rows("8:10").Select
Selection.EntireRow.Hidden = True
ActiveSheet.Protect DrawingObjects:=True, _
Contents:=True, Scenarios:=True
End Sub
Wird das Makro direkt gestartet, funktioniert es, wird es über den Button aufgerufen kommt die Fehlermeldung:
Laufzeitfehler 1004: Unprotect-Methode des Worksheet-Objektes ist fehlerhaft.
Jemand eine Idee?
Gruss
Yogi