Hoe meerdere werkbladen tegelijk in Excel te beveiligen?

Stel dat u een werkmap hebt met meerdere werkbladen en u nu alle werkbladen of een aantal specifieke werkbladen wilt beveiligen, kunt u in Excel normaal gesproken alleen de werkbladen één voor één beveiligen met de functie Blad beveiligen. Deze methode is echter omslachtig en tijdrovend als er meerdere werkbladen zijn die beveiligd moeten worden. Hoe beveiligt u snel en eenvoudig meerdere werkbladen tegelijk in Excel?

Bescherm alle bladen tegelijk met VBA-code

Bescherm meerdere bladen tegelijk met Kutools voor Excel

Ontgrendel meerdere bladen tegelijk met Kutools voor Excel

Bescherm alle bladen tegelijk met VBA-code

Met de volgende VBA-code kunt u alle bladen van de actieve werkmap tegelijk beveiligen met hetzelfde wachtwoord, doe dit als volgt:

1. Houd de ALT + F11 toetsen, en het opent de Microsoft Visual Basic voor toepassingen venster.

2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.

VBA-code: bescherm alle werkbladen in een werkmap tegelijk:

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. Druk vervolgens op F5 sleutel om de code uit te voeren, en voer het wachtwoord voor de beschermde bladen in het promptvenster in, zie screenshot:

4. Klikken OKen voer het wachtwoord opnieuw in om het te bevestigen.

5. Dan klikken OK, en alle bladen zijn beveiligd met hetzelfde wachtwoord.

Bescherm meerdere bladen tegelijk met Kutools voor Excel

Soms wilt u niet alle bladen in uw werkmap beschermen en wilt u alleen enkele specifieke bladen beschermen, in deze situatie werkt de bovenstaande code niet. Maar met Kutools for Excel's Bescherm werkblad hulpprogramma, kunt u zowel alle bladen als specifieke bladen snel en gemakkelijk beschermen.

Na het installeren van Kutools for Excelgaat u als volgt te werk:

1. Klikken Koetools Plus > Bescherm werkblad, zie screenshot:

2. In de Bescherm werkblad dialoogvenster, selecteert u de werkbladen die u wilt beveiligen. (Standaard zijn alle werkbladen in de huidige werkmap aangevinkt.) Zie schermafbeelding:

3. En klik op OKen typ en bevestig het wachtwoord in het dialoogvenster Werkblad beveiligen. Zie screenshot:

4. Dan klikken OK, de geselecteerde werkbladen zijn beveiligd.

Klik op Werkblad beveiligen voor meer informatie over deze functie.

Ontgrendel meerdere bladen tegelijk met Kutools voor Excel

Hoe kunt u de beveiliging van meerdere beveiligde werkbladen in een werkmap tegelijkertijd opheffen? Natuurlijk, Kutools for Excel biedt ook de Beveiliging werkblad opheffen hulpprogramma voor u om ze in één keer onbeschermd te maken.

Voer de volgende stappen uit:

1. Open uw werkmap die de beschermde werkbladen bevat.

2. Dan klikken Koetools Plus > Beveiliging werkblad opheffen, zie screenshot:

3. In de Beveiliging werkblad opheffen dialoogvenster, worden de beschermde bladen in de keuzelijst weergegeven en klikt u op Ok knop, zie screenshot:

4. En dan een Beveiliging werkblad opheffen dialoogvenster verschijnt om u eraan te herinneren het wachtwoord in te voeren dat u hebt gemaakt om de werkbladen te beschermen, zie screenshot:

5. Klik na het typen van het wachtwoord op Okzijn alle aangevinkte werkbladen in de keuzelijst onbeschermd.

Opmerking: De werkbladen moeten hetzelfde wachtwoord hebben.

Om meer te weten over deze functie Werkblad opheffen.

Demo: bescherm of maak de beveiliging van alle werkbladen tegelijk ongedaan met Kutools voor Excel

Gerelateerd artikel:

Hoe kan ik meerdere werkbladen tegelijk in Excel opheffen?