Probleme beim Daten per Makro mit PW schützen
Mandy
ich habe eine Mappe, da wird beim Öffnen der Mappe gleich mal der Range B24:F34 gesperrt.
Nun laufen ein paar makros. Da kann es vorkommen, das Daten wieder in den Range geschrieben werden müssen. Also Range wieder freigeben und Daten rein. (passt)
So nun soll ganz am Schluss der Prozedur der Range wieder gesperrt werden (Daten_Sperren)
Und da hörts auf, die Daten werden nicht gesperrt, es kommt auch keine Fehlermeldung.
Mit einer Msgbox habe ich schon getestet, ob der Code bis zu dem Aufruf Daten_sperren alles abarbeitet.
Also, das tut er , er steigt vorher nicht aus, trotzdem werden die daten nicht mehr gesperrt.
Habe ich einen Fehler im Code ?
Danke mal
Mandy
Sub Daten_sperren()
Worksheets("Daten").Range("B24:F34").Locked = True
Worksheets("Daten").Protect DrawingObjects:=False, Password:="TEST"
End Sub
Sub Daten_freigeben()
Worksheets("Daten").Unprotect Password:="TEST"
Worksheets("Daten").Range("B24:F34").Locked = False
Worksheets("Daten").Unprotect
End Sub