Prva metoda bo uvedla VBA za vklop ali izklop določene zaščite delovnega lista v Excelu. Naredite naslednje:

1. Pritisnite druga + F11 tipke hkrati, da odprete okno Microsoft Visual Basic for Applications.

2. klik Vstavi > Moduliin nato v spodnje okno modula prilepite spodnjo kodo VBA.

VBA: Preklop določene zaščite delovnega lista v Excelu

Sub ToggleProtect()
If ActiveSheet.ProtectContents Then
ActiveSheet.Unprotect "password"
Else
ActiveSheet.Protect "password"
End If
End Sub

Opombe: V zgornji kodi zamenjajte obe »gesli« z natančno geslom, s katerim zaščitite ta delovni list.

3. Pritisnite druga + F8 tipke hkrati, da odprete pogovorno okno Makro, kliknite, da izberete ToggleProtect v polju Ime makra in nato kliknite možnosti gumb.

4. V začetnem pogovornem oknu Možnosti makrov določite bližnjično tipko za ta VBA in kliknite OK gumb.

V našem primeru določimo Ctrl + u kot bližnjice za ta VBA.

5. Zaprite pogovorno okno Makro.

Od zdaj naprej pritiskate Ctrl + u tipke skupaj bodo odstranili zaščito tega delovnega lista in pritisnili Ctrl + u tipke znova skupaj bodo ta delovni list znova zaščitile.

Če imate nameščen Kutools za Excel, lahko nastavitve zasnove delovnega lista konfigurirate tako, da preklopite (ali vklopite / izklopite) zaščito delovnega lista s samo kliki v Excelu.

1. klik Podjetje > Oblikovanje delovnega lista , da aktivirate zavihek Oblikovanje in nato kliknite Nastavitve gumb na Oblikovanje zavihek. Oglejte si posnetek zaslona:

2. V začetnem pogovornem oknu Nastavitve orodij za načrtovanje pojdite na Zaščitite oddelek in:

(1) Preverite Preden odprete orodja za oblikovanje, odstranite zaščitni list možnost in Zaščitite delovni list, preden zaprete orodja za oblikovanje možnost;

(2) V Uporabite geslo vnesite geslo, s katerim ščitite trenutni delovni list.

3. Kliknite Ok v pogovornem oknu Nastavitve orodij za načrtovanje.

Od zdaj naprej bo ta delovni list samodejno zaščiten, ko kliknete Oblikovanje delovnega lista gumb na Podjetje tab.

In ta delovni list bo samodejno zaščiten, ko kliknete Zapri oblikovanje gumb na Oblikovanje tab.