leider finde ich unter der Überschrift nur Hinweise, wie man die Formeln verbirgt.
Ich möchte aber den Blattschutz einstellen und die Formeln weiterhin sichtbar lassen.
Der folgende Code funktioniert (leider nur ohne Option Explicit):
'Blattschutz setzen
With Workbooks("Mappe1").Worksheets("Tabelle1")
.EnableSelection = xlLockedCells
.Protect Password:="Passwort"
End With
Der folgende Code leider nicht, da die Variable "xlLockedCells" nicht deklariert ist:
Option Explicit
'Blattschutz setzen
With Workbooks("Mappe1").Worksheets("Tabelle1")
.EnableSelection = xlLockedCells
.Protect Password:="Passwort"
End With
Kann mir jemand sagen, was ich falsch mache?Vielen Dank und viele Grüße
Martin