Note: The other languages of the website are Google-translated. Back to English
Autentificare  \/ 
x
or
x
Înregistrare  \/ 
x

or

Cum să protejați toate registrele de lucru dintr-un folder simultan în Excel?

În Excel, puteți proteja un registru de lucru pentru a împiedica alți utilizatori să îl editeze, dar v-ați imaginat vreodată să protejați mai multe registre de lucru simultan? Aici vă prezint câteva trucuri privind protejarea tuturor registrelor de lucru dintr-un folder și a mai multor coli dintr-un registru de lucru în Excel.

Protejați registrele de lucru dintr-un folder simultan cu VBA

Protejați mai multe foi simultan cu Kutools pentru Excel idee bună3

Fila Office Activați editarea și navigarea cu file în Office și faceți munca mult mai ușoară ...
Kutools pentru Excel vă rezolvă majoritatea problemelor și vă crește productivitatea cu 80%
  • Reutilizați orice: Adăugați cele mai utilizate sau complexe formule, diagrame și orice altceva la preferatele dvs. și reutilizați-le rapid în viitor.
  • Peste 20 de caracteristici text: Extrageți numărul din șirul de text; Extrageți sau eliminați o parte din texte; Conversia numerelor și valutelor în cuvinte în limba engleză.
  • Merge Tools: Mai multe cărți de lucru și foi într-unul; Combinați mai multe celule / rânduri / coloane fără a pierde date; Combinați rândurile duplicate și suma.
  • Instrumente divizate: Împărțiți datele în mai multe foi bazate pe valoare; Un registru de lucru pentru mai multe fișiere Excel, PDF sau CSV; O coloană la mai multe coloane.
  • Lipiți săriți Rânduri ascunse / filtrate; Număr și sumă de Culoarea fundalului; Trimiteți e-mailuri personalizate către mai mulți destinatari în bloc.
  • Super Filtru: Creați scheme avansate de filtrare și aplicați oricăror foi; Sortează pe săptămână, zi, frecvență și multe altele; Filtru prin îndrăznețe, formule, comentarii ...
  • Peste 300 de caracteristici puternice; Funcționează cu Office 2007-2019 și 365; Suportă toate limbile; Implementare ușoară în întreprindere sau organizație.

săgeată albastru dreapta balon Protejați registrele de lucru dintr-un folder simultan cu VBA

Pentru a proteja registrele de lucru într-un anumit folder, puteți aplica un cod macro pentru rezolvare.

1. Activați un registru de lucru nou și apăsați Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicațiins fereastră și faceți clic pe Insera > module și lipiți codul de mai jos în Module script-ul.

VBA: Protejați registrele de lucru într-un folder.

Sub ProtectAll()
    Dim xWorkBooks As Workbook
    Dim xExitFile As String
    Dim xPassWord As Variant
    Dim xStrPath As String
    Dim xFileDialog As FileDialog
    Dim xFile As String
    On Error Resume Next
    Set xFileDialog = Application.FileDialog(msoFileDialogFolderPicker)
    xFileDialog.AllowMultiSelect = False
    xFileDialog.Title = "Select a folder [Kutools for Excel]"
    If xFileDialog.Show = -1 Then
        xStrPath = xFileDialog.SelectedItems(1)
    End If
    If xStrPath = "" Then
        Exit Sub
    Else
        xStrPath = xStrPath + "\"
    End If
    xPassWord = Application.InputBox("Enter password", "Kutools for Excel", , , , , , 2)
    If (xPassWord = False) Or (xPassWord = "") Then
        MsgBox "Password cannot be blank!", vbInformation, "Kutools for Excel"
        Exit Sub
    End If
    xFile = "*.xls"
    xExitFile = Dir(xStrPath & xFile)
    On Error Resume Next
    Application.ScreenUpdating = False
    Do While xExitFile <> ""
        Set xWorkBooks = Workbooks.Open(xStrPath & xExitFile)
        Application.DisplayAlerts = False
        xWorkBooks.SaveAs Filename:=xWorkBooks.FullName, Password:=xPassWord
        Application.DisplayAlerts = True
        Workbooks(xExitFile).Close False
        Set xWorkBooks = Nothing
        xExitFile = Dir
    Loop
    Application.ScreenUpdating = True
    MsgBox "Successfully protect!", vbInformation, "Kutools for Excel"
End Sub

 

doc protejează toate registrele de lucru un dosar 1

2. presa F5 cheie și a Selectați un folder fereastra apare pentru a selecta un folder pentru a proteja toate foile de lucru.
doc protejează toate registrele de lucru un dosar 2

3. clic OK și apare un dialog pentru introducerea parolei pentru protejarea registrelor de lucru.
doc protejează toate registrele de lucru un dosar 3

4. clic OK, apare un dialog pentru a vă reaminti că toate registrele de lucru din folderul selectat au fost protejate cu succes cu o singură parolă.
doc protejează toate registrele de lucru un dosar 4

Când deschideți registrele de lucru pe care le-ați protejat de codul de mai sus, apare un dialog pentru introducerea parolei. Vedeți captura de ecran:
doc protejează toate registrele de lucru un dosar 5

Sfat: Acest cod funcționează pentru versiunea Excel 2007 sau mai recentă, dacă doriți să o aplicați pentru a proteja versiunea inferioară, o puteți schimba xFile = "* .xls" la xFile = "* .xlsx" în cod.


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

De fapt, va fi mai frecvent să protejăm mai multe foi într-un registru de lucru în activitatea noastră zilnică. Dar în Excel, trebuie să protejați foile una câte una cu funcția sa încorporată. Cu toate acestea, există un instrument puternic - Kutools pentru Excel, ict Protejați foaia de lucru utilitarul vă poate ajuta să protejați simultan toate foile sau foile selectate ale registrului de lucru.

Kutools pentru Excel, cu mai mult de 120 funcții Excel la îndemână, vă îmbunătățesc eficiența de lucru și economisiți timpul de lucru.

După instalare gratuită Kutools pentru Excel, faceți următoarele:

1. Activați registrul de lucru pe care doriți să îl protejați foile și faceți clic pe Afacere > Protejați foaia de lucru. Vedeți captura de ecran:
doc protejează toate registrele de lucru un dosar 6

2. În Protejați foaia de lucru , puteți verifica din listă foile pe care doriți să le protejați, după cum aveți nevoie. Vedeți captura de ecran:
doc protejează toate registrele de lucru un dosar 7

3. clic Okși apare un alt dialog pentru a introduce și a tasta din nou parola, consultați captura de ecran:
doc protejează toate registrele de lucru un dosar 8

4. clic Okși apare un dialog pentru a vă reaminti protejarea cu succes a foilor de lucru.
doc protejează toate registrele de lucru un dosar 9

Pentru neprotejarea acestor foi, trebuie doar să faceți clic Afacere > Desprotejați foaia de lucru pentru a introduce parola pentru neprotejare.
doc protejează toate registrele de lucru un dosar 10

descărcare doc 1


Cele mai bune instrumente de productivitate Office

Kutools pentru Excel vă rezolvă majoritatea problemelor și vă crește productivitatea cu 80%

  • reutilizarea: Introduceți rapid formule complexe, diagrame și orice ai folosit anterior; Criptați celulele cu parola; Creați o listă de corespondență și trimiteți e-mailuri ...
  • Super Formula Bar (editați cu ușurință mai multe linii de text și formulă); Layout de citire (citiți și editați cu ușurință un număr mare de celule); Lipiți la interval filtrat...
  • Merge celule / rânduri / coloane fără a pierde date; Conținut de celule divizate; Combinați rânduri / coloane duplicate... Prevenirea celulelor duplicate; Comparați gamele...
  • Selectați Duplicat sau Unic Rânduri; Selectați Rânduri goale (toate celulele sunt goale); Super Find și Fuzzy Find în multe cărți de lucru; Selectare aleatorie ...
  • Copie exactă Mai multe celule fără modificarea referinței formulelor; Creați automat referințe la foi multiple; Introduceți gloanțe, Casete de selectare și multe altele ...
  • Extrageți textul, Adăugați text, eliminați după poziție, Eliminați spațiul; Creați și imprimați subtotaluri de paginare; Convertiți conținutul dintre celule și comentarii...
  • Super Filtru (salvați și aplicați scheme de filtrare altor foi); Sortare avansată după lună / săptămână / zi, frecvență și multe altele; Filtru special cu bold, italic ...
  • Combinați cărți de lucru și foi de lucru; Merge Tables pe baza coloanelor cheie; Împărțiți datele în mai multe foi; Conversia în loturi xls, xlsx și PDF...
  • Peste 300 de funcții puternice. Suportă Office / Excel 2007-2019 și 365. Suportă toate limbile. Implementare ușoară în întreprindere sau organizație. Funcții complete de încercare gratuită de 30 de zile. Garanție de restituire a banilor de 60 de zile.
fila kte 201905

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 în fiecare zi!
fundul officetab
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Martin · 1 years ago
    Brilliant. Saves me nearly an hour every month. Thank you.
  • To post as a guest, your comment is unpublished.
    Mary · 3 years ago
    can you do the same code but for unprotecting? with option to browse for the folder
  • To post as a guest, your comment is unpublished.
    P · 3 years ago
    I'm getting a syntax error for the following: <span style="background-color...
    • To post as a guest, your comment is unpublished.
      Jessica · 6 months ago
      Did you fix this ? How?

  • To post as a guest, your comment is unpublished.
    ckshah · 4 years ago
    workbook protect ...great program....
    very helpful