Τετράδια εργασίας | Φύλλα εργασίας | Πίνακας
Ο 'Δείκτης εκτός της περιοχής'λάθος στο Excel VBA συμβαίνει όταν αναφέρεστε σε ένα ανύπαρκτο μέλος συλλογής ή σε ένα ανύπαρκτο στοιχείο πίνακα.
Τοποθετήστε ένα κουμπί εντολών στο φύλλο εργασίας σας και προσθέστε τις γραμμές κώδικα παρακάτω. Για να εκτελέσετε τις γραμμές κώδικα, κάντε κλικ στο κουμπί εντολών στο φύλλο.
Τετράδια εργασίας
Η συλλογή βιβλίων εργασίας στο Excel VBA περιέχει όλα τα αντικείμενα του βιβλίου εργασίας που είναι ανοιχτά αυτήν τη στιγμή.
1. Η παρακάτω γραμμή κωδικού κλείνει τις πωλήσεις.xlsm.
Τετράδια εργασίας ("sales.xlsm"). Κλείσιμο
Αποτέλεσμα όταν δεν υπάρχει ανοιχτό βιβλίο εργασίας με αυτό το όνομα:
Σημείωση: για να διορθώσετε αυτό το σφάλμα "subscript out of range" (σφάλμα χρόνου εκτέλεσης 9), ανοίξτε το sales.xlsm πριν κάνετε κλικ στο κουμπί εντολών.
Φύλλα εργασίας
Η συλλογή φύλλων εργασίας στο Excel VBA περιέχει όλα τα αντικείμενα φύλλου εργασίας σε ένα βιβλίο εργασίας. Το βιβλίο εργασίας μας έχει 3 φύλλα εργασίας.
1. Η παρακάτω γραμμή κώδικα προσπαθεί να τοποθετήσει τη λέξη Hello στο κελί A1 στο 4ο φύλλο εργασίας.
Φύλλα εργασίας (4). Εύρος ("A1"). Τιμή = "Γεια σας"
Αποτέλεσμα όταν κάνετε κλικ στο κουμπί εντολών στο φύλλο:
Επεξήγηση: εμφανίζεται το σφάλμα "subscript out of range" επειδή δεν υπάρχει 4ο φύλλο εργασίας. Για να διορθώσετε αυτό το σφάλμα, αλλάξτε το 4 σε 1, 2 ή 3 (ή εισαγάγετε ένα νέο φύλλο εργασίας κάνοντας κλικ στο σύμβολο συν).
Πίνακας
Ένας πίνακας είναι μια ομάδα μεταβλητών. Στο Excel VBA, μπορείτε να αναφερθείτε σε μια συγκεκριμένη μεταβλητή (στοιχείο) ενός πίνακα χρησιμοποιώντας το όνομα του πίνακα και τον αριθμό ευρετηρίου.
1. Η πρώτη γραμμή κώδικα παρακάτω δηλώνει έναν πίνακα συμβολοσειράς με όνομα Films. Ο πίνακας αποτελείται από πέντε στοιχεία.
2. Στη συνέχεια, αρχικοποιούμε κάθε στοιχείο του πίνακα.
3. Η τελική γραμμή κώδικα προσπαθεί να εμφανίσει το 6ο στοιχείο χρησιμοποιώντας ένα MsgBox.
Χαμηλή ταινία (1 έως 5) ως συμβολοσειρά
Ταινίες (1) = "Άρχοντας των δαχτυλιδιών"
Ταινίες (2) = "Ταχύτητα"
Ταινίες (3) = "Πόλεμοι των Άστρων"
Ταινίες (4) = "Ο Νονός"
Ταινίες (5) = "Pulp Fiction"
MsgBox Films (6)
Αποτέλεσμα όταν κάνετε κλικ στο κουμπί εντολών στο φύλλο:
Επεξήγηση: εμφανίζεται το σφάλμα "subscript out of range" επειδή δεν υπάρχει 6ο στοιχείο. Για να διορθώσετε αυτό το σφάλμα, αλλάξτε το 6 σε 1, 2, 3, 4 ή 5 (ή δηλώστε έναν πίνακα συμβολοσειράς με 6 στοιχεία).
