Αντικείμενο εμβέλειας Excel VBA

ο Αντικείμενο εύρους, η οποία είναι η αναπαράσταση ενός κελιού (ή κελιών) στο φύλλο εργασίας σας, είναι το πιο σημαντικό αντικείμενο Excel VBA. Αυτό το κεφάλαιο δίνει μια γενική εικόνα τουιδιότητες και μεθόδους του αντικειμένου Range. Οι ιδιότητες είναι κάτι που ένα αντικείμενο έχει (περιγράφει το αντικείμενο), ενώ οι μέθοδοι κάνουν κάτι (εκτελούν μια ενέργεια με ένα αντικείμενο).

Παραδείγματα εμβέλειας

Τοποθετήστε ένα κουμπί εντολών στο φύλλο εργασίας σας και προσθέστε την ακόλουθη γραμμή κώδικα:

Range("B3").Value = 2

Αποτέλεσμα όταν κάνετε κλικ στο κουμπί εντολών στο φύλλο:

Κώδικας:

Range("A1:A4").Value = 5

Αποτέλεσμα:

Κώδικας:

Range("A1:A2,B3:C4").Value = 10

Αποτέλεσμα:

Σημείωση: Για να αναφερθείτε σε μια ονομαστική περιοχή στον κωδικό σας Excel VBA, χρησιμοποιήστε μια γραμμή κώδικα όπως αυτή:

Range("Prices").Value = 15

Κύτταρα

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

Κώδικας:

Cells(3, 2).Value = 2

Αποτέλεσμα:

Επεξήγηση: Το Excel VBA εισάγει την τιμή 2 στο κελί στη διασταύρωση της σειράς 3 και της στήλης 2.

Κώδικας:

Range(Cells(1, 1), Cells(4, 1)).Value = 5

Αποτέλεσμα:

Δηλώστε ένα αντικείμενο εμβέλειας

Μπορείτε να δηλώσετε ένα αντικείμενο Range χρησιμοποιώντας τις λέξεις-κλειδιά Dim and Set.

Κώδικας:

Dim example As Range
Set example = Range("A1:C4")

example.Value = 8

Αποτέλεσμα:

Δηλώστε ένα αντικείμενο εμβέλειας στο Excel VBA

Επιλέγω

Μια σημαντική μέθοδος του αντικειμένου Range είναι η μέθοδος Select. Η μέθοδος επιλογής απλά επιλέγει ένα εύρος τιμών.

Κώδικας:

Dim example As Range
Set example = Range("A1:C4")

example.Select

Αποτέλεσμα:

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

Worksheets(3).Activate
Worksheets(3).Range("B7").Select

Γραμμές

Η ιδιότητα Γραμμές δίνει πρόσβαση σε μια συγκεκριμένη σειρά ενός εύρους.

Κώδικας:

Dim example As Range
Set example = Range("A1:C4")

example.Rows(3).Select

Αποτέλεσμα:

Σημείωση: Περίγραμμα μόνο για απεικόνιση.

Στήλες

Η ιδιότητα Στήλες δίνει πρόσβαση σε μια συγκεκριμένη στήλη ενός εύρους.

Κώδικας:

Dim example As Range
Set example = Range("A1:C4")

example.Columns(2).Select

Αποτέλεσμα:

Σημείωση: Περίγραμμα μόνο για απεικόνιση.

Αντιγραφή επικόλληση

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

Κώδικας:

Range("A1:A2").Select
Selection.Copy

Range("C3").Select
ActiveSheet.Paste

Αποτέλεσμα:

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

Range("C3:C4").Value = Range("A1:A2").Value

Σαφή

Για να καταργήσετε το περιεχόμενο μιας κλίμακας Excel, μπορείτε να χρησιμοποιήσετε τη μέθοδο ClearContents.

Range("A1").ClearContents

ή απλά χρησιμοποιήστε:

Range("A1").Value = ""

Σημείωση: Χρησιμοποιήστε τη μέθοδο Clear για να διαγράψετε το περιεχόμενο και τη μορφή ενός εύρους. Χρησιμοποιήστε τη μέθοδο ClearFormats για να καθαρίσετε μόνο τη μορφή.