Excel που ονομάζεται εύρος και προγραμματισμός - Παραδείγματα κώδικα VBA

Πίνακας περιεχομένων

Ονομασμένο εύρος

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

Όταν ξεκίνησα για πρώτη φορά την κωδικοποίηση στο Excel, κωδικοποίησα σκληρά κάθε αναφορά σε ένα κελί. Για παράδειγμα, κάθε φορά που θα αναφέρω ή θα ορίζω μια ιδιότητα του Cell A2 στο Sheet1 θα χρησιμοποιούσα κάτι σαν αυτό:

varProductID = Sheet1.Range ("A2")

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

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

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

Η λύση: Ονομασμένο εύρος

Ορίζω ένα κελί Α2 με ένα όνομα περιοχής και αναφέρω το όνομα από τον κωδικό. Τώρα ένας υπάλληλος μπορεί να εισαγάγει σειρές ή να κόψει μια επικόλληση Α2 σύμφωνα με τις επιθυμίες της καρδιάς του και ο κώδικας εξακολουθεί να λειτουργεί. Ενα παράδειγμα:

varProductID = Sheet1.Range ("nrProductID")

Θα βοηθήσει στην ανάπτυξη του τόπου, μοιράζονται τη σελίδα με τους φίλους σας

wave wave wave wave wave