Salt la conținutul principal

Cum să protejați mai multe foi de lucru simultan în Excel?

Presupunând că aveți un registru de lucru care conține mai multe foi de lucru, iar acum trebuie să protejați toate foile de lucru sau unele foi de lucru specifice, în mod normal în Excel, puteți proteja foaia doar una câte una cu funcția Protejați foaia, dar această metodă este plictisitoare și consumatoare de timp dacă există numeroase coli trebuie protejate. Cum protejați mai multe foi simultan în Excel rapid și ușor?

Protejați toate foile simultan cu codul VBA

Protejați mai multe foi simultan cu Kutools pentru Excel

Protejați mai multe foi simultan cu kutools pentru Excel


săgeată albastru dreapta balon Protejați toate foile simultan cu codul VBA

Cu următorul cod VBA, puteți proteja toate foile din registrul de lucru activ simultan cu aceeași parolă, procedați astfel:

1. Țineți apăsat butonul ALT + F11 tastele și deschide fișierul Microsoft Visual Basic pentru aplicații fereastră.

2. Clic Insera > Moduleși lipiți următorul cod în Fereastra modulului.

Cod VBA: Protejați toate foile de lucru dintr-un registru de lucru simultan:

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. Apoi apăsați F5 pentru a rula codul și introduceți parola pentru foile protejate în caseta de prompt, consultați captura de ecran:

doc-protect-multiple-sheets1-1

4. Clic OK, apoi introduceți parola din nou pentru a confirma parola.

doc-protect-multiple-sheets2-2

5. Apoi apasa OKși toate foile au fost protejate cu aceeași parolă.


săgeată albastru dreapta balon Protejați mai multe foi simultan cu Kutools pentru Excel

Uneori, nu doriți să protejați toate foile din registrul dvs. de lucru și doriți doar să protejați anumite foi specifice, în această situație, codul de mai sus nu va funcționa. Dar cu Kutools pentru Excel'S Protejați foaia de lucru utilitar, puteți proteja rapid și ușor atât foile, cât și foile specifice.

Kutools pentru Excel : cu mai mult de 300 de programe de completare Excel la îndemână, gratuit pentru a încerca fără limitări în 60 de zile

După instalare Kutools pentru Excel, vă rugăm să efectuați următorii pași:

1. Clic Kutools Plus > Protejați foaia de lucru, vezi captura de ecran:

2. În Protejați foaia de lucru caseta de dialog, selectați foile pe care doriți să le protejați. (În mod implicit, toate foile de lucru din registrul de lucru curent sunt bifate.) Vedeți captura de ecran:

doc-protect-multiple-sheets4-4

3. și faceți clic OK, apoi tastați și confirmați parola în caseta de dialog Protejați foaia de lucru. Vedeți captura de ecran:

doc-protect-multiple-sheets5-5

4. Apoi apasa OK, foile de lucru selectate au fost protejate.

Faceți clic pe Protejați foaia de lucru pentru a afla mai multe despre această caracteristică.


săgeată albastru dreapta balon Protejați mai multe foi simultan cu kutools pentru Excel

Cum ați putea să protejați mai multe foi de lucru protejate într-un registru de lucru în același timp? Desigur, Kutools pentru Excel oferă, de asemenea, Desprotejați foaia de lucru utilitate pentru a le proteja deodată.

Vă rugăm să efectuați următorii pași:

1. Deschideți registrul de lucru care conține foile de lucru protejate.

2. Apoi apasa Kutools Plus > Desprotejați foaia de lucru, vezi captura de ecran:

3. În Desprotejați foaia de lucru caseta de dialog, foile protejate sunt listate în caseta de listă, apoi faceți clic pe Ok buton, vezi captura de ecran:

doc-protect-multiple-sheets7-7

4. Și apoi a Desprotejați foaia de lucru caseta de dialog apare pentru a vă reaminti să introduceți parola pe care ați creat-o pentru a proteja foile de lucru, consultați captura de ecran:

doc-protect-multiple-sheets8-8

5. După ce tastați parola, faceți clic pe Ok, toate foile de lucru verificate din caseta de listă au fost neprotejate.

Notă: Fișele de lucru trebuie să aibă aceeași parolă.

Pentru a afla mai multe despre această caracteristică Foaie de lucru Unprotect.

Descărcați și proba gratuită Kutools pentru Excel acum!


săgeată albastru dreapta balon Demo: Protejați sau dezactivați toate foile de lucru simultan cu Kutools pentru Excel

Kutools pentru Excel: cu mai mult de 300 de programe de completare Excel la îndemână, încercați fără limitări în 30 de zile. Descărcați și proba gratuită acum!

Articol asociat:

Cum să protejați mai multe foi de lucru simultan în Excel?

Cele mai bune instrumente de productivitate de birou

🤖 Kutools AI Aide: Revoluționați analiza datelor pe baza: Execuție inteligentă   |  Generați codul  |  Creați formule personalizate  |  Analizați datele și generați diagrame  |  Invocați funcțiile Kutools...
Caracteristici populare: Găsiți, evidențiați sau identificați duplicatele   |  Ștergeți rândurile goale   |  Combinați coloane sau celule fără a pierde date   |   Rundă fără Formula ...
Super căutare: VLookup cu mai multe criterii    VLookup cu valori multiple  |   VLookup pe mai multe foi   |   Căutare fuzzy ....
Listă derulantă avansată: Creați rapid o listă derulantă   |  Listă drop-down dependentă   |  Listă derulantă cu selectare multiplă ....
Manager de coloane: Adăugați un număr specific de coloane  |  Mutați coloanele  |  Comutați starea vizibilității coloanelor ascunse  |  Comparați intervale și coloane ...
Caracteristici prezentate: Focus pe grilă   |  Vedere de proiectare   |   Big Formula Bar    Manager registru de lucru și foi   |  Biblioteca de resurse (Text automat)   |  Data Picker   |  Combinați foi de lucru   |  Criptare/Decriptare celule    Trimiteți e-mailuri după listă   |  Super Filtru   |   Filtru special (filtrează bold/italic/barat...) ...
Top 15 seturi de instrumente12 Text Instrumente (Adăuga text, Eliminați caractere,...)   |   50+ Diagramă Tipuri de (Gantt Chart,...)   |   40+ Practic Formule (Calculați vârsta pe baza zilei de naștere,...)   |   19 inserare Instrumente (Introduceți codul QR, Inserați imaginea din cale,...)   |   12 Convertire Instrumente (Numere la cuvinte, conversie valutara,...)   |   7 Merge & Split Instrumente (Rânduri combinate avansate, Celule divizate,...)   |   ... și altele

Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp.  Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...

Descriere


Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

  • Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
  • Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
  • Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
Comments (21)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I am trying to use this in a shared workbook but I get a Microsoft Visual Basic error "Run-time error '1004": Application-defined or object-defined error" I am just looking for suggestions on how to get around this. Any help would be appreciated
This comment was minimized by the moderator on the site
Occurs when sheet is already locked
This comment was minimized by the moderator on the site
Thanks for the wonder full tool to protect & unprotect all the sheets at a time. Please guide me I am able to unprotect all sheets in my work book at a time but when I run protect all sheets VBA Code then only first 4 sheets are protected & rest or left unprotected. Please help me to sort out the issue.
This comment was minimized by the moderator on the site
How do I mask the password using the VBA method? I can not find this information via google or F1 help files. Thanks in advance!
This comment was minimized by the moderator on the site
Hi I used this code now I it wont accept my password to get back into my spreadsheet !!
This comment was minimized by the moderator on the site
I have chart tabs and worksheets in my Excel 2013 workbook. The VBA coding above works for the protecting the worksheets but not the separate chart tabs. How do i password protect the multiple chart tabs and multiple worksheets in my workbook? Thanks!
This comment was minimized by the moderator on the site
Hey, I need some help, the above code was very helpful, but it locks the sort (auto filter as well) can you please provide code to solve that problem and also where it would be inserted. Thank you in advance.
This comment was minimized by the moderator on the site
Thank you! This is awesome, I was even able to modify the VBA code so that I could unprotect all sheets at once! :) Sub unprotect_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 Next For Each s In ActiveWorkbook.Worksheets s.Unprotect Password:=pass Next Exit Sub oops: MsgBox "I think you have some sheets that are already protected. Please unprotect all sheets B4 running this Macro." End Sub
This comment was minimized by the moderator on the site
when i activated this VBA, hyperlink doesn't work. how can i make them work? tnx :)
This comment was minimized by the moderator on the site
I am suddenly having the 1004 error as well. Anyone find a solution?
This comment was minimized by the moderator on the site
I'm suddenly having the error 1004 issue. Have been using the macro for months now it randomly fails.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations