Hallo Community,
habe ein Problem mit meinen Code und komme nicht drauf woran es genau liegen könnte.
Der Code lautet wie folgt.
Private Sub Workbook_Open()
Worksheets("Blatt_1").Activate
Information_1.Show
Worksheets("Blatt_1").Unprotect Password:="Test"
'Worksheets("Blatt_1").Range("A5").Locked = False
Worksheets("Blatt_1").Protect UserInterfaceonly:=True, Password:="Test"
End Sub
Beim ausführen des Codes bekomme ich die Fehlermeldung "Laufzeitfehler '1004' Anwendungs- oder objektdefinierter Fehler"
Der Fehler scheint ist Zeile 5 zu sein, wo ich Versuche Zelle A5 nicht zu sperren.
Gruß
Bruni
|