Wie schütze ich mehrere Arbeitsblätter gleichzeitig in Excel?

Angenommen, Sie haben eine Arbeitsmappe, die mehrere Arbeitsblätter enthält, und jetzt müssen Sie alle Arbeitsblätter oder bestimmte Arbeitsblätter schützen, normalerweise in Excel. Sie können das Blatt nur einzeln mit der Funktion "Blatt schützen" schützen. Diese Methode ist jedoch langwierig und mühsam Zeitaufwändig, wenn zahlreiche Blätter geschützt werden müssen. Wie können Sie mehrere Blätter gleichzeitig in Excel schnell und einfach schützen?

Schützen Sie alle Blätter gleichzeitig mit VBA-Code

Schützen Sie mehrere Blätter gleichzeitig mit Kutools for Excel

Deaktivieren Sie mehrere Blätter gleichzeitig mit kutools for Excel

Schützen Sie alle Blätter gleichzeitig mit VBA-Code

Mit dem folgenden VBA-Code können Sie alle Blätter der aktiven Arbeitsmappe gleichzeitig mit demselben Kennwort schützen. Gehen Sie dazu folgendermaßen vor:

1. Halten Sie die Taste gedrückt ALT + F11 Tasten, und es öffnet die Microsoft Visual Basic für Applikationen Fenster.

2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modulfenster.

VBA-Code: Schützen Sie alle Arbeitsblätter in einer Arbeitsmappe gleichzeitig:

Sub protect_all_sheets()
top: 
pass = InputBox("password?") 
repass = InputBox("Verify Password") 
If Not (pass = repass) Then 
MsgBox "you made a boo boo" 
Goto top 
End If 
For i = 1 To Worksheets.Count 
If Worksheets(i).ProtectContents = True Then Goto oops 
Next 
For Each s In ActiveWorkbook.Worksheets 
s.Protect Password:=pass 
Next 
Exit Sub 
oops: MsgBox "I think you have some sheets that are already protected. Please unprotect all sheets then running this Macro." 
End Sub

3. Dann drücken F5 Geben Sie den Schlüssel ein, um den Code auszuführen, und geben Sie das Kennwort für die geschützten Blätter in das Eingabeaufforderungsfeld ein (siehe Abbildung):

4. Klicken Sie OKGeben Sie das Kennwort erneut ein, um das Kennwort zu bestätigen.

5. Dann klick OKund alle Blätter wurden mit demselben Passwort geschützt.

Schützen Sie mehrere Blätter gleichzeitig mit Kutools for Excel

Manchmal möchten Sie nicht alle Blätter in Ihrer Arbeitsmappe schützen und nur einige bestimmte Blätter schützen. In dieser Situation funktioniert der obige Code nicht. Aber mit Kutools for Excel Arbeitsblatt schützen Mit diesem Dienstprogramm können Sie sowohl alle Blätter als auch bestimmte Blätter schnell und einfach schützen.

Nach der Installation Kutools for ExcelBitte gehen Sie wie folgt vor:

1. Klicken Sie Kutoolen Plus > Arbeitsblatt schützen, siehe Screenshot:

2. In dem Arbeitsblatt schützen Wählen Sie im Dialogfeld die Blätter aus, die Sie schützen möchten. (Standardmäßig sind alle Arbeitsblätter in der aktuellen Arbeitsmappe aktiviert.) Siehe Screenshot:

3. Und klicken Sie auf OKGeben Sie das Kennwort im Dialogfeld Arbeitsblatt schützen ein und bestätigen Sie es. Siehe Screenshot:

4. Dann klick OKwurden die ausgewählten Arbeitsblätter geschützt.

Klicken Sie auf Arbeitsblatt schützen, um weitere Informationen zu dieser Funktion zu erhalten.

Deaktivieren Sie mehrere Blätter gleichzeitig mit kutools for Excel

Wie können Sie den Schutz mehrerer geschützter Arbeitsblätter in einer Arbeitsmappe gleichzeitig aufheben? Na sicher, Kutools for Excel Außerdem stellt die Arbeitsblatt aufheben Dienstprogramm, mit dem Sie den Schutz sofort aufheben können.

Bitte machen Sie folgende Schritte:

1. Öffnen Sie Ihre Arbeitsmappe mit den geschützten Arbeitsblättern.

2. Dann klick Kutoolen Plus > Arbeitsblatt aufheben, siehe Screenshot:

3. In dem Arbeitsblatt aufheben Im Dialogfeld werden die geschützten Blätter im Listenfeld aufgelistet. Klicken Sie dann auf Ok Schaltfläche, siehe Screenshot:

4. Und dann a Arbeitsblatt aufheben Das Dialogfeld wird angezeigt, um Sie daran zu erinnern, dass Sie das Kennwort eingegeben haben, das Sie zum Schutz der Arbeitsblätter erstellt haben. Siehe Screenshot:

5. Klicken Sie nach Eingabe des Passworts auf OkAlle aktivierten Arbeitsblätter im Listenfeld sind ungeschützt.

Hinweis: Die Arbeitsblätter müssen dasselbe Passwort haben.

Weitere Informationen zu dieser Funktion zum Aufheben des Schutzes des Arbeitsblatts.

Kutools für Excel jetzt herunterladen und kostenlos testen!

Demo: Schützen oder deaktivieren Sie alle Arbeitsblätter gleichzeitig mit Kutools for Excel

In Verbindung stehender Artikel:

Wie hebe ich den Schutz mehrerer Arbeitsblätter gleichzeitig in Excel auf?