Πίνακας περιεχομένων
Σε αυτό το άρθρο, θα σας δείξω πώς μπορείτε να χρησιμοποιήσετε το UsedRange ιδιότητα του VBA στο Excel. Θα μάθετε να χρησιμοποιείτε το UsedRange για ένα κλειστό εύρος, για ένα διάσπαρτο εύρος, για ένα ανενεργό φύλλο εργασίας, καθώς και για ένα ανενεργό βιβλίο εργασίας.
Κατεβάστε το βιβλίο ασκήσεων
Κατεβάστε αυτό το τετράδιο εργασιών για να εξασκηθείτε ενώ διαβάζετε αυτό το άρθρο.
Excel VBA UsedRange.xlsmΕισαγωγή στην ιδιότητα UsedRange της VBA στο Excel
Το UsedRange ιδιότητα του VBA επιστρέφει ένα Εύρος Επιστρέφει μια περιοχή που αποτελείται από όλα τα κελιά ενός φύλλου εργασίας που έχει χρησιμοποιηθεί, συμπεριλαμβανομένης μιας κενής γραμμής στην αρχή.
Σε μια VBA κώδικα, το UsedRange πρέπει να χρησιμοποιείται μαζί με το όνομα του φύλλου εργασίας. Έτσι, η κοινή σύνταξη για τη χρήση της ιδιότητας UsedRange για το ενεργό φύλλο εργασίας είναι:
Dim Rng As Range
Set Rng = ActiveSheet.UsedRange
⧭ Σημειώσεις:
- Εδώ Rng είναι το όνομα του Εύρος που επιστρέφεται από το UsedRange Μπορείτε να χρησιμοποιήσετε ό,τι θέλετε.
- Για να ασκήσει το UsedRange σε ένα φύλλο εργασίας διαφορετικό από το ενεργό, χρησιμοποιήστε το όνομα του φύλλου εργασίας.
Για παράδειγμα, για να το εφαρμόσετε σε ένα φύλλο εργασίας με όνομα Φύλλο1 , ένθετο:
Set Rng = Φύλλα εργασίας("Sheet1").UsedRange 4 τρόποι χρήσης της ιδιότητας UsedRange της VBA στο Excel
Εδώ είναι τα 4 πιο συνηθισμένοι τρόποι χρήσης του UsedRange ιδιοκτησία στο VBA .
1. Ιδιότητα UsedRange της VBA για ένα κλειστό εύρος
Πρώτα απ' όλα, θα χρησιμοποιήσουμε το VBA UsedRange ιδιότητα για ένα φύλλο εργασίας με κλειστό εύρος.
Θα επιστρέψει ολόκληρο το εύρος, συμπεριλαμβανομένης μιας κενής γραμμής στην αρχή.
Εδώ έχουμε ένα φύλλο εργασίας που ονομάζεται Φύλλο1 που περιέχει ένα κλειστό εύρος που αποτελείται από τα ονόματα, τις ημερομηνίες ένταξης και τους μισθούς ορισμένων υπαλλήλων μιας εταιρείας.
Τώρα αν χρησιμοποιήσετε το UsedRange σε αυτό το φύλλο εργασίας, θα επιστρέψει το εύρος B2:C13 (Συμπεριλαμβανομένης μιας κενής σειράς στην αρχή).
Εάν Φύλλο1 είναι ενεργή, μπορείτε να χρησιμοποιήσετε:
Dim Rng As Range
Set Rng = ActiveSheet.UsedRange
Ή μπορείτε να χρησιμοποιήσετε:
Dim Rng As Range
Set Rng = Φύλλα εργασίας("Sheet1").UsedRange
⧭ Έξοδος:
Έχουμε χρησιμοποιήσει το Επιλέξτε ιδιότητα ενός Εύρος Έτσι, αν εκτελέσουμε τον κώδικα, θα επιλέξει το εύρος B2:D13 του Φύλλο1 .
Διαβάστε περισσότερα: Πώς να χρησιμοποιήσετε το αντικείμενο Range της VBA στο Excel (5 ιδιότητες)
2. Ιδιότητα UsedRange της VBA για ένα διάσπαρτο εύρος
Εάν έχετε μια διάσπαρτη περιοχή σε οποιοδήποτε φύλλο εργασίας, το UsedRange θα επιστρέψει ένα εύρος που θα περιλαμβάνει τα κενά κελιά ανάμεσά τους.
Τώρα, στο Φύλλο1 , έχουμε τον συνολικό μισθό, τον υψηλότερο μισθό και τον χαμηλότερο μισθό διάσπαρτα σε διάφορα σημεία, από το κελί B3 στο G3 , όπως αυτό:
Τώρα χρησιμοποιήστε οποιαδήποτε από τις δύο γραμμές κώδικα για να χρησιμοποιήσετε το UsedRange ιδιοκτησία.
Dim Rng As Range
Set Rng = ActiveSheet.UsedRange
Ή
Dim Rng As Range
Set Rng = Φύλλα εργασίας("Sheet1").UsedRange
⧭ Έξοδος:
Επιστρέφει όλα τα κελιά εντός του εύρους B2:G3 του Φύλλο1 συμπεριλαμβανομένων των κενών κελιών (συμπεριλαμβανομένης μιας κενής γραμμής στην αρχή). Καθώς έχουμε χρησιμοποιήσει το Επιλέξτε ιδιότητα του Εύρος , θα επιλέξει το εύρος B2:G3.
Διαβάστε περισσότερα: Τέλος ενός εύρους με χρήση της VBA στο Excel (με παραδείγματα)
Παρόμοιες αναγνώσεις
- Excel VBA Αντιγραφή περιοχής σε άλλο φύλλο (8 ευκολότεροι τρόποι)
- Βρόχος σε μια σειρά για κάθε κελί με το Excel VBA (Απόλυτος οδηγός)
- Σφάλμα υποδείκτη εκτός εύρους στο Excel στο VBA (με 5 λύσεις)
3. Ιδιότητα UsedRange της VBA για ένα ανενεργό φύλλο εργασίας
Αν θέλουμε να ασκήσουμε το UsedRange σε ένα ανενεργό φύλλο εργασίας, πρέπει να αναφέρετε στην αρχή το όνομα του φύλλου εργασίας.
Για παράδειγμα, εδώ το ενεργό φύλλο εργασίας μου είναι Φύλλο1 .
Για να χρησιμοποιήσετε το UsedRange ιδιοκτησία στο Φύλλο2 , πρέπει να χρησιμοποιήσουμε:
Dim Rng As Range
Set Rng = Worksheets("Sheet2").UsedRange
Θα επιλέξει όλα τα χρησιμοποιούμενα κελιά στο φύλλο εργασίας που ονομάζεται Φύλλο2 .
Διαβάστε περισσότερα: VBA για τον καθορισμό εύρους στο Excel (7 παραδείγματα)
4. Ιδιότητα UsedRange της VBA για ένα ανενεργό βιβλίο εργασίας
Μπορείτε να χρησιμοποιήσετε την ιδιότητα UsedRange ακόμη και για ένα βιβλίο εργασίας που δεν είναι ενεργό. Απλά βάλτε το όνομα του βιβλίου εργασίας μπροστά.
Για παράδειγμα, εδώ το ενεργό βιβλίο εργασίας μου είναι Βιβλίο εργασίας1 . για να ασκήσει το UsedRange property over Φύλλο1 του Βιβλίο εργασίας2 , πρέπει να χρησιμοποιήσουμε:
Dim Rng As Range
Set Rng = Workbooks("Workbook2.xlsm").Worksheets("Sheet1").UsedRange
Θα επιλέξει τη χρησιμοποιούμενη περιοχή του φύλλου εργασίας Φύλλο1 του Βιβλίο εργασίας2 .
Διαβάστε περισσότερα: VBA για κάθε κελί σε σειρά στο Excel (3 μέθοδοι)
Πράγματα που πρέπει να θυμάστε
Το UsedRange ιδιότητα του VBA επιστρέφει ένα Εύρος Εδώ σε αυτό το άρθρο, έχουμε χρησιμοποιήσει το αντικείμενο Επιλέξτε ιδιότητα ενός Αντικείμενο Range για λόγους οπτικοποίησης. Αλλά προφανώς, μπορείτε να χρησιμοποιήσετε οποιαδήποτε άλλη ιδιότητα ενός Εύρος ανάλογα με την ευκολία σας.
Συμπέρασμα
Χρησιμοποιώντας αυτές τις μεθόδους, μπορείτε να χρησιμοποιήσετε το UsedRange Έχετε οποιεσδήποτε ερωτήσεις; Μη διστάσετε να μας ρωτήσετε.
