Blattschutz mit Formatierung in Excel
Schritt-für-Schritt-Anleitung
Um in Excel den Blattschutz mit der Möglichkeit der Formatierung zu aktivieren, kannst du folgendes VBA-Makro verwenden:
Option Explicit
Sub BlattSchutz()
' kennwort Makro
' Tastenkombination: Keine
Dim myPwd As String, myPwd2 As String
Dim wks As Worksheet
myPwd = Application.InputBox("Passwort eingeben")
myPwd2 = Application.InputBox("Wiederholung")
If myPwd2 = myPwd Then
For Each wks In ActiveWorkbook.Worksheets
wks.Protect Password:=myPwd, DrawingObjects:=True, _
Contents:=True, Scenarios:=True, AllowFormattingCells:=True, _
AllowFormattingColumns:=True, AllowFormattingRows:=True
Next wks
Else
MsgBox "Passwort falsch"
End If
End Sub
- Öffne Excel und drücke
ALT + F11, um den VBA-Editor zu öffnen.
- Füge das obige Makro in ein neues Modul ein.
- Schließe den VBA-Editor und gehe zurück zu Excel.
- Führe das Makro aus, um den Blattschutz zu aktivieren. Du wirst nach einem Passwort gefragt.
Häufige Fehler und Lösungen
-
Problem: Das Passwort wird nicht benötigt, um den Blattschutz aufzuheben.
- Lösung: Stelle sicher, dass du das Passwort korrekt in der
wks.Protect-Methode angibst. Achte darauf, dass du den Code für jedes Arbeitsblatt korrekt anwendest.
-
Problem: Zellen können trotz aktivem Blattschutz formatiert werden.
- Lösung: Überprüfe, ob du die richtigen
AllowFormatting-Optionen im Code gesetzt hast. Diese sollten in der Protect-Methode angegeben werden.
Alternative Methoden
-
Excel Optionen: Du kannst auch den Blattschutz über die Excel-Oberfläche aktivieren. Gehe zu Überprüfen > Blatt schützen und aktiviere die gewünschten Optionen für die Formatierung.
-
VBA ohne Passwort: Wenn du möchtest, dass der Blattschutz ohne Passwort funktioniert, kannst du die Passworteingabe im Makro weglassen.
Praktische Beispiele
- Excel Blattschutz mit Ausnahmen: Wenn du nur bestimmte Zellen zum Formatieren zulassen möchtest, kannst du die Zellen zuvor entsperren. Wähle die Zellen aus, gehe zu
Format > Zellen > Schutz und deaktiviere die Option „Gesperrt“, bevor du den Blattschutz aktivierst.
Tipps für Profis
-
Tastenkombination zum Aufheben des Blattschutzes: Du kannst eine benutzerdefinierte Tastenkombination für das Aufheben des Blattschutzes erstellen, indem du ein weiteres Makro schreibst. Nutze dafür Application.OnKey in deinem VBA-Code.
-
Zellenformatierung aufheben: Wenn du die Zellenformatierung für bestimmte Zellen aufheben möchtest, kannst du dies über die Excel-Oberfläche tun, indem du die Zellen auswählst und die Formatierungen über Start > Zellen > Format > Zellen formatieren zurücksetzt.
FAQ: Häufige Fragen
1. Wie kann ich den Blattschutz mit einer Tastenkombination aufheben?
Du kannst einen VBA-Code erstellen, der eine Tastenkombination zum Aufheben des Blattschutzes festlegt. Beispiel:
Sub BlattschutzAufheben()
Dim myPwd As String
myPwd = "dein_passwort"
ActiveSheet.Unprotect Password:=myPwd
End Sub
2. Kann ich die Eingabe in geschützten Zellen erlauben?
Ja, du kannst die Eingabe in bestimmten Zellen erlauben, indem du diese Zellen vor dem Aktivieren des Blattschutzes entsperrst.
3. Wie kann ich die Formatierung schützen und gleichzeitig die Eingabe erlauben?
Du kannst die Eingabe in geschützten Zellen erlauben, indem du die Option „In geschützten Zellen schreiben“ aktivierst, während du den Blattschutz einrichtest.