17.03.2020, 16:05
Hallo,
ich erstelle eine Datei in Excel die von den anderen nicht bearbeitet werden soll. Daher habe ich mein Blatt geschützt.
Das Gruppieren funktioniert ja leider nur mit Makro daher habe ich etwas gegoogelt und das hier gefunden:
Es soll das Gruppieren, sowie formatieren der Zellen möglich sein (die Höhe und Breite muss bearbeitbar sein), geschützte Zellen nicht anwählbar
Sub Workbook_open()
Dim ws As Worksheet
For Each ws In Worksheets
ws.Protect (*) userinterfaceonly:=True
ActiveSheet.Protect AllowFormattingCells:=True, AllowFormattingColumns:=True, AllowFormattingRows:=True
ws.EnableOutlining = True
Next ws
End Sub
das funktioniert auch bestens!:)
Nun zu meinen Problem:
Ich möchte dass beim lösen des Blattschutzes ein Passwort abgefragt wird. wenn ich aber bei (*) ein Passwort setze muss ich dieses beim Lösen nicht mehr eingeben.
Wie kann ich das Lösen? Bitte um Hilfe
ich erstelle eine Datei in Excel die von den anderen nicht bearbeitet werden soll. Daher habe ich mein Blatt geschützt.
Das Gruppieren funktioniert ja leider nur mit Makro daher habe ich etwas gegoogelt und das hier gefunden:
Es soll das Gruppieren, sowie formatieren der Zellen möglich sein (die Höhe und Breite muss bearbeitbar sein), geschützte Zellen nicht anwählbar
Sub Workbook_open()
Dim ws As Worksheet
For Each ws In Worksheets
ws.Protect (*) userinterfaceonly:=True
ActiveSheet.Protect AllowFormattingCells:=True, AllowFormattingColumns:=True, AllowFormattingRows:=True
ws.EnableOutlining = True
Next ws
End Sub
das funktioniert auch bestens!:)
Nun zu meinen Problem:
Ich möchte dass beim lösen des Blattschutzes ein Passwort abgefragt wird. wenn ich aber bei (*) ein Passwort setze muss ich dieses beim Lösen nicht mehr eingeben.
Wie kann ich das Lösen? Bitte um Hilfe