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

Anonim

Μερικές φορές ο κώδικας VBA ή ορισμένοι τύποι εξαρτώνται από το όνομα του φύλλου εργασίας. Εάν το όνομα του φύλλου εργασίας αλλάξει, η συμπεριφορά του κώδικα ή του τύπου VBA μπορεί να αλλάξει. Είναι λοιπόν πολύ σημαντικό να γνωρίζουμε πώς να αποτρέψουμε τον χρήστη από το να αλλάξει το όνομα του φύλλου.

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

Ακολουθεί το στιγμιότυπο του φύλλου εργασίας που περιέχει δύο φύλλα. Μόνιμη & Προσωρινή

Πρέπει να ακολουθήσουμε τα παρακάτω βήματα για να διορθώσουμε το όνομα του Μόνιμου φύλλου στο ίδιο το "Μόνιμο".

  • Κάντε κλικ στην καρτέλα Προγραμματιστής
  • Από την ομάδα κωδικών, επιλέξτε Visual Basic

  • Εισαγάγετε τον ακόλουθο κώδικα στην τρέχουσα μονάδα φύλλου εργασίας


Private Sub Worksheet_SelectionChange (ByVal Target As Range)
Εάν Sheet1.Name "Permanent" Τότε
Sheet1.Name = "Μόνιμο"
Τέλος εαν
Τέλος υπο

  • Μετά την αντιγραφή του κώδικα. αν προσπαθήσουμε να αλλάξουμε το όνομα του φύλλου "Μόνιμο" τότε το excel δεν θα μας το επιτρέψει.

Πώς λειτουργεί;

Εδώ χρησιμοποιούμε φύλλο εργασίας_SelectionChange Event. Αυτό το συμβάν ενεργοποιείται όταν αλλάζει η επιλογή φύλλου.

Σε αυτήν την περίπτωση ελέγχουμε αν το όνομα του φύλλου είναι "Μόνιμο" ή όχι. Αν όχι, αλλάζουμε το όνομα του φύλλου σε "Μόνιμο" αλλιώς δεν συμβαίνει τίποτα. Πανεύκολο!

Λοιπόν, ναι, έτσι μπορείτε να αποτρέψετε την αλλαγή του ονόματος του φύλλου. Ελπίζω να ήμουν αρκετά επεξηγηματικός. Εάν έχετε αμφιβολίες, ενημερώστε με στην παρακάτω ενότητα σχολίων.

Λήψη-Δείγμα αρχείου