Arbeitsblatt sperren per VBA - Formatierung
18.11.2017 10:13:08
Andy
wie kann ich ein Arbeitsblatt komplett sperren, so dass ich nur noch den Text in der freigegebenen Zelle bearbeiten kann. Der Clous ist allerdings, dass ich die Gruppierungsfunktion unbedingt benötige, aber zb. die Formatierungen der Zellen und die bedingten Formatierungen dort behalten will, wenn ein Benutzer mal wieder das Feld nur kopiert und nicht die werte direkt einträgt.
Verwende bislang folgenden Code beim Aufrufen der Excel Datei:
Sub Workbook_Open()
'Automatisches Sperren der Arbeitsmappe
Dim i As Long
For i = 1 To Worksheets.Count
Sheets(i).Protect userinterfaceonly:=True, DrawingObjects:=False, AllowFiltering:=True, _
Contents:=True, _
Scenarios:=True, Password:="huhu"
Sheets(i).EnableOutlining = True
Next i
'Nachfolgendes Tabellenblatt beim Start der Datei öffnen
Worksheets("Diensteinteilung").Select
End Sub
Anzeige