Μετάβαση στο κύριο περιεχόμενο

Πώς να προστατεύσετε πολλά φύλλα εργασίας ταυτόχρονα στο Excel;

Ας υποθέσουμε ότι έχετε ένα βιβλίο εργασίας που περιέχει πολλά φύλλα εργασίας και τώρα πρέπει να προστατεύσετε όλα τα φύλλα εργασίας ή ορισμένα συγκεκριμένα φύλλα εργασίας, συνήθως στο Excel, μπορείτε μόνο να προστατεύσετε το φύλλο ένα προς ένα με τη λειτουργία Protect Sheet, αλλά αυτή η μέθοδος είναι κουραστική και χρονοβόρα εάν υπάρχουν πολλά φύλλα πρέπει να προστατευθούν. Πώς προστατεύετε πολλά φύλλα ταυτόχρονα στο Excel γρήγορα και εύκολα;

Προστατέψτε όλα τα φύλλα ταυτόχρονα με τον κωδικό VBA

Προστατέψτε πολλά φύλλα ταυτόχρονα με το Kutools για Excel

Καταργήστε την προστασία πολλών φύλλων ταυτόχρονα με kutools για Excel


βέλος μπλε δεξιά φούσκα Προστατέψτε όλα τα φύλλα ταυτόχρονα με τον κωδικό VBA

Με τον ακόλουθο κώδικα VBA, μπορείτε να προστατεύσετε ταυτόχρονα όλα τα φύλλα του ενεργού βιβλίου εργασίας με τον ίδιο κωδικό πρόσβασης, κάνοντας αυτό:

1. Κρατήστε πατημένο το ALT + F11 και ανοίγει το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Παράθυρο ενότητας.

Κωδικός VBA: Προστατέψτε όλα τα φύλλα εργασίας σε ένα βιβλίο εργασίας ταυτόχρονα:

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. Στη συνέχεια πατήστε F5 για να εκτελέσετε τον κωδικό και εισαγάγετε τον κωδικό πρόσβασης για τα προστατευμένα φύλλα στο πλαίσιο προτροπής, δείτε το στιγμιότυπο οθόνης:

doc-protect-πολλαπλά φύλλα1-1

4. Κλίκ OKκαι, στη συνέχεια, εισαγάγετε ξανά τον κωδικό πρόσβασης για να επιβεβαιώσετε τον κωδικό πρόσβασης.

doc-protect-πολλαπλά φύλλα2-2

5. Στη συνέχεια κάντε κλικ στο κουμπί OKκαι όλα τα φύλλα έχουν προστατευτεί με τον ίδιο κωδικό πρόσβασης.


βέλος μπλε δεξιά φούσκα Προστατέψτε πολλά φύλλα ταυτόχρονα με το Kutools για Excel

Μερικές φορές, δεν θέλετε να προστατεύσετε όλα τα φύλλα στο βιβλίο εργασίας σας και θέλετε μόνο να προστατεύσετε ορισμένα συγκεκριμένα φύλλα, σε αυτήν την περίπτωση, ο παραπάνω κώδικας δεν θα λειτουργήσει. Αλλά με Kutools για Excel'S Προστατέψτε το φύλλο εργασίας βοηθητικό πρόγραμμα, μπορείτε να προστατεύσετε τόσο όλα τα φύλλα όσο και τα συγκεκριμένα φύλλα γρήγορα και εύκολα.

Kutools για Excel : με περισσότερα από 300 εύχρηστα πρόσθετα Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 60 ημέρες

Μετά την εγκατάσταση Kutools για Excel, κάντε τα εξής βήματα:

1. Κλίκ Kutools Plus > Προστατέψτε το φύλλο εργασίας, δείτε το στιγμιότυπο οθόνης:

2. Στην Προστατέψτε το φύλλο εργασίας πλαίσιο διαλόγου, επιλέξτε τα φύλλα που θέλετε να προστατεύσετε. (Από προεπιλογή, όλα τα φύλλα εργασίας στο τρέχον βιβλίο εργασίας είναι επιλεγμένα.) Δείτε το στιγμιότυπο οθόνης:

doc-protect-πολλαπλά φύλλα4-4

3. και κάντε κλικ OKκαι, στη συνέχεια, πληκτρολογήστε και επιβεβαιώστε τον κωδικό πρόσβασης στο παράθυρο διαλόγου "Προστατέψτε το φύλλο εργασίας". Δείτε το στιγμιότυπο οθόνης:

doc-protect-πολλαπλά φύλλα5-5

4. Στη συνέχεια κάντε κλικ στο κουμπί OK, τα επιλεγμένα φύλλα εργασίας έχουν προστατευτεί.

Κάντε κλικ στην Προστασία φύλλου εργασίας για να μάθετε περισσότερα σχετικά με αυτήν τη δυνατότητα.


βέλος μπλε δεξιά φούσκα Καταργήστε την προστασία πολλών φύλλων ταυτόχρονα με kutools για Excel

Πώς θα μπορούσατε να προστατεύσετε ταυτόχρονα πολλά προστατευμένα φύλλα εργασίας σε ένα βιβλίο εργασίας; Φυσικά, Kutools για Excel παρέχει επίσης το Αποπροστασία φύλλου εργασίας βοηθητικό πρόγραμμα για να τα προστατεύσετε ταυτόχρονα.

Κάντε τα παρακάτω βήματα:

1. Ανοίξτε το βιβλίο εργασίας σας που περιέχει τα προστατευμένα φύλλα εργασίας.

2. Στη συνέχεια κάντε κλικ στο κουμπί Kutools Plus > Αποπροστασία φύλλου εργασίας, δείτε το στιγμιότυπο οθόνης:

3. Στην Αποπροστασία φύλλου εργασίας πλαίσιο διαλόγου, τα προστατευμένα φύλλα είναι λίστα στο πλαίσιο λίστας και, στη συνέχεια, κάντε κλικ στο Ok κουμπί, δείτε το στιγμιότυπο οθόνης:

doc-protect-πολλαπλά φύλλα7-7

4. Και μετά α Αποπροστασία φύλλου εργασίας εμφανίζεται ένα παράθυρο διαλόγου για να σας υπενθυμίσει ότι εισάγετε τον κωδικό πρόσβασης που έχετε δημιουργήσει για την προστασία των φύλλων εργασίας, δείτε το στιγμιότυπο οθόνης:

doc-protect-πολλαπλά φύλλα8-8

5. Αφού πληκτρολογήσετε τον κωδικό πρόσβασης, κάντε κλικ στο Ok, όλα τα επιλεγμένα φύλλα εργασίας στο πλαίσιο λίστας δεν προστατεύονται.

Σημείωση: Τα φύλλα εργασίας πρέπει να έχουν τον ίδιο κωδικό πρόσβασης.

Για να μάθετε περισσότερα σχετικά με αυτήν τη δυνατότητα Μη προστατευμένο φύλλο εργασίας

Κατεβάστε και δωρεάν δοκιμή Kutools για Excel τώρα!


βέλος μπλε δεξιά φούσκα Επίδειξη: Προστατέψτε ή Καταργήστε την προστασία όλων των φύλλων εργασίας ταυτόχρονα με το Kutools για Excel

Kutools για Excel: με περισσότερα από 300 εύχρηστα πρόσθετα του Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες. Λήψη και δωρεάν δοκιμή τώρα!

Σχετικό άρθρο:

Πώς να αποπροστατεύσετε πολλά φύλλα εργασίας ταυτόχρονα στο Excel;

Τα καλύτερα εργαλεία παραγωγικότητας γραφείου

🤖 Kutools AI Aide: Επανάσταση στην ανάλυση δεδομένων με βάση: Ευφυής Εκτέλεση   |  Δημιουργία κώδικα  |  Δημιουργία προσαρμοσμένων τύπων  |  Αναλύστε δεδομένα και δημιουργήστε γραφήματα  |  Επίκληση Λειτουργιών Kutools...
Δημοφιλή χαρακτηριστικά: Εύρεση, επισήμανση ή αναγνώριση διπλότυπων   |  Διαγραφή κενών γραμμών   |  Συνδυάστε στήλες ή κελιά χωρίς απώλεια δεδομένων   |   Γύρος χωρίς φόρμουλα ...
Σούπερ Αναζήτηση: VLookup πολλαπλών κριτηρίων    VLookup πολλαπλών τιμών  |   VLookup σε πολλά φύλλα   |   Ασαφής αναζήτηση ....
Σύνθετη αναπτυσσόμενη λίστα: Γρήγορη δημιουργία αναπτυσσόμενης λίστας   |  Εξαρτημένη αναπτυσσόμενη λίστα   |  Πολλαπλή αναπτυσσόμενη λίστα ....
Διαχειριστής στήλης: Προσθέστε έναν συγκεκριμένο αριθμό στηλών  |  Μετακίνηση στηλών  |  Εναλλαγή κατάστασης ορατότητας κρυφών στηλών  |  Συγκρίνετε εύρη και στήλες ...
Επιλεγμένα Χαρακτηριστικά: Εστίαση πλέγματος   |  Προβολή σχεδίου   |   Μεγάλη Formula Bar    Διαχείριση βιβλίου εργασίας & φύλλου   |  Βιβλιοθήκη πόρων (Αυτόματο κείμενο)   |  Επιλογή ημερομηνίας   |  Συνδυάστε φύλλα εργασίας   |  Κρυπτογράφηση/Αποκρυπτογράφηση κελιών    Αποστολή email ανά λίστα   |  Σούπερ φίλτρο   |   Ειδικό φίλτρο (φίλτρο με έντονη γραφή/πλάγια γραφή/διαγραφή...) ...
Κορυφαία 15 σύνολα εργαλείων12 Κείμενο Εργαλεία (Προσθήκη κειμένου, Κατάργηση χαρακτήρων, ...)   |   50 + Διάγραμμα Τύποι (Gantt διάγραμμα, ...)   |   40+ Πρακτικό ΜΑΘΗΜΑΤΙΚΟΙ τυποι (Υπολογίστε την ηλικία με βάση τα γενέθλια, ...)   |   19 Εισαγωγή Εργαλεία (Εισαγωγή κωδικού QR, Εισαγωγή εικόνας από το μονοπάτι, ...)   |   12 Μετατροπή Εργαλεία (Αριθμοί σε λέξεις, Μετατροπή Συναλλάγματος, ...)   |   7 Συγχώνευση & διαχωρισμός Εργαλεία (Σύνθετες σειρές συνδυασμού, Διαίρεση κελιών, ...)   |   ... κι αλλα

Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου.  Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...

Περιγραφή


Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
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