Πώς να αποτρέψετε την αλλαγή του ονόματος φύλλου στο Excel;

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

Αποτρέψτε την αλλαγή ονόματος φύλλου προστατεύοντας το βιβλίο εργασίας

Αποτρέψτε την αλλαγή ονόματος φύλλου χρησιμοποιώντας τον κωδικό VBA

Αποτρέψτε την αλλαγή ονόματος φύλλου προστατεύοντας το βιβλίο εργασίας

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

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

2. Στην Προστατέψτε τη δομή και τα Windows πλαίσιο διαλόγου, εισαγάγετε τον κωδικό πρόσβασης, επιλέξτε το Structure υπό Προστατέψτε το βιβλίο εργασίας γιακαι, στη συνέχεια, επιβεβαιώστε ξανά τον κωδικό πρόσβασης, δείτε το στιγμιότυπο οθόνης:

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

Σημείωση: Με αυτήν τη δυνατότητα, εκτός από την αλλαγή ονόματος φύλλου, απενεργοποιούνται επίσης και άλλες λειτουργίες όπως εισαγωγή φύλλου, διαγραφή φύλλου, απόκρυψη φύλλου….

Αποτρέψτε την αλλαγή ονόματος φύλλου χρησιμοποιώντας τον κωδικό VBA

Εδώ είναι ένας κωδικός VBA που μπορεί επίσης να σας βοηθήσει να αποτρέψετε την αλλαγή ενός συγκεκριμένου ονόματος φύλλου. Κάντε το ως εξής:

1. Κάντε δεξί κλικ στην καρτέλα φύλλων που θέλετε να προστατεύσετε το όνομα του φύλλου, ώστε να μην αλλάξει και, στη συνέχεια, επιλέξτε Προβολή κωδικού από το μενού περιβάλλοντος, στο αναδυόμενο Microsoft Visual Basic για εφαρμογές παράθυρο, αντιγράψτε και επικολλήστε τον ακόλουθο κώδικα στο κενό Μονάδα μέτρησης:

Κωδικός VBA: Αποτροπή αλλαγής ονόματος φύλλου:

Private Sub worksheet_SelectionChange(ByVal Target As Excel.Range)
'Updateby Extendoffice
If ActiveSheet.Name <> "Master" Then
ActiveSheet.Name = "Master"
End If
End Sub

Σημείωση: Στον παραπάνω κώδικα, Μάσταr είναι το όνομα φύλλου που θέλετε να προστατεύσετε από την αλλαγή.

2. Στη συνέχεια, αποθηκεύστε και κλείστε τον κωδικό, από τώρα και στο εξής, όταν μετονομάσετε αυτό το συγκεκριμένο όνομα φύλλου, θα επαναφερθεί στο αρχικό ταυτόχρονα. Δείτε το στιγμιότυπο οθόνης: