Πώς να ορίσετε ένα όνομα πίνακα χρησιμοποιώντας μια μακροεντολή
Θέλετε να βεβαιωθείτε ότι το όνομα του ενεργού πίνακα έχει οριστεί στο κείμενο που μπορεί να βρεθεί σε ένα συγκεκριμένο κελί του πίνακα; Χρησιμοποιήστε την ακόλουθη μακροεντολή:
Ορισμός ονομάτων υποπίνακων ()
Dim Cell As String
Κελί = "a1"
ActiveSheet.Name = ActiveSheet.Range (κελί). Κείμενο
Τέλος υπο
Με την τιμή της μεταβλητής κύτταρο καθορίστε από ποιο κελί πρέπει να ληφθεί το κείμενο. Για να το κάνετε αυτό, μεταφέρετε την κατάλληλη αναφορά κελιού (εδώ: A1) ως διεύθυνση.
Η μακροεντολή λαμβάνει το περιεχόμενο από το αντίστοιχο κελί στον ενεργό πίνακα. Το τρέχον φύλλο εργασίας μετονομάζεται στη συνέχεια ανάλογα. Το παρακάτω σχήμα δείχνει ένα παράδειγμα μετονομασμένου πίνακα:
