Εάν έχετε διανείμει βιβλία εργασίας του Excel με προστατευμένα φύλλα, πιθανότατα θα λάβετε πίσω τα βιβλία εργασίας με τα φύλλα να είναι ακόμα προστατευμένα. Συχνά, πρέπει να καταργήσετε την προστασία των φύλλων εργασίας σε ένα βιβλίο εργασίας πριν συνεχίσετε την εργασία σας. Εάν διαπιστώσετε ότι καταργείτε συνεχώς φύλλα εργασίας, αυτή η μακροεντολή μπορεί να είναι απλώς το εισιτήριο.
Πώς λειτουργεί η μακροεντολή
Ο κώδικας ενεργοποιείται από το συμβάν Open του βιβλίου εργασίας. Όταν ανοίγετε ένα βιβλίο εργασίας, αυτό το συμβάν ενεργοποιείται, εκτελώντας τον κώδικα μέσα. Αυτή η μακροεντολή καταργεί αυτόματα την προστασία του καθορισμένου φύλλου με τον δεδομένο κωδικό πρόσβασης όταν ανοίξει το βιβλίο εργασίας:
Ιδιωτικό δευτερεύον βιβλίο εργασίας_Άνοιγμα()
«Βήμα 1: Προστατέψτε το φύλλο με κωδικό πρόσβασης
Φύλλα("Φύλλο1").Κατάργηση προστασίας του κωδικού πρόσβασης:="ΚΟΚΚΙΝΟ"
End Sub
Η μακροεντολή ονομάζει ρητά το φύλλο που θέλετε να καταργήσετε την προστασία — Φύλλο1, σε αυτήν την περίπτωση. Στη συνέχεια, περνά τον κωδικό πρόσβασης που απαιτείται για την κατάργηση της προστασίας του φύλλου.
Οι κωδικοί πρόσβασης του Excel κάνουν διάκριση πεζών-κεφαλαίων, επομένως δώστε προσοχή στον ακριβή κωδικό πρόσβασης και τη χρήση κεφαλαίων που χρησιμοποιείτε.
Πώς να χρησιμοποιήσετε τη μακροεντολή
Για να εφαρμόσετε αυτήν τη μακροεντολή, πρέπει να την αντιγράψετε και να την επικολλήσετε στο παράθυρο κώδικα συμβάντος Workbook_Open. Η τοποθέτηση της μακροεντολής εδώ της επιτρέπει να εκτελείται κάθε φορά που ανοίγει το βιβλίο εργασίας:
Ενεργοποιήστε το Visual Basic Editor πατώντας Alt+F11.
Στο παράθυρο του έργου, βρείτε το όνομα του έργου/του βιβλίου εργασίας σας και κάντε κλικ στο σύμβολο συν δίπλα του για να δείτε όλα τα φύλλα.
Κάντε κλικ στο This Workbook.
Στην αναπτυσσόμενη λίστα Συμβάν, επιλέξτε το συμβάν Άνοιγμα.
Πληκτρολογήστε ή επικολλήστε τον κωδικό στη μονάδα που δημιουργήθηκε πρόσφατα, τροποποιώντας το όνομα του φύλλου (αν χρειάζεται) και τον κωδικό πρόσβασης.
Εισαγάγετε τον κωδικό σας στο συμβάν Άνοιγμα βιβλίου εργασίας.