Learn About Creating VBA Named Ranges in Excel

Το Excel είναι το απόλυτο εργαλείο παραγωγικότητας. Μάθετε πώς να δημιουργείτε Named Ranges στο Excel χρησιμοποιώντας VBA και βρείτε συμβουλές για εξοικονόμηση χρόνου όταν εργάζεστε με δεδομένα και τύπους.
Learn About Creating VBA Named Ranges in Excel

Το Excel είναι το απόλυτο εργαλείο παραγωγικότητας. Μάθετε πώς να δημιουργείτε Named Ranges στο Excel χρησιμοποιώντας VBA και βρείτε συμβουλές για εξοικονόμηση χρόνου όταν εργάζεστε με δεδομένα και τύπους.

Το

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

Ψάχνετε να μάθετε για τη δημιουργία Named Ranges και τη χρήση μακροεντολών VBA στο Excel; Αν ναι, έχετε έρθει στο σωστό μέρος. Σε αυτήν την ανάρτηση ιστολογίου, θα συζητήσουμε πώς να δημιουργήσετε Named Ranges στο Excel χρησιμοποιώντας VBA.

Θα δώσουμε επίσης μερικά παραδείγματα για το πώς μπορείτε να χρησιμοποιήσετε τα Named Ranges στη δική σας εργασία. Ας ξεκινήσουμε!

Τι είναι ένα ονομασμένο εύρος στο Microsoft Excel;

Χρησιμοποιώντας ένα εύρος με όνομα αντί για αναφορά στήλης/σειράς, μπορείτε να ανατρέξετε σε ένα κελί ή μια ομάδα κελιών με προσαρμοσμένο όνομα. Η δυνατότητα καθορισμού των δεδομένων μέσα στα κελιά σας είναι ένα τεράστιο πλεονέκτημα από τη χρήση των Named Ranges.

Ακολουθεί ένα γρήγορο παράδειγμα του τρόπου με τον οποίο μπορείτε να χρησιμοποιήσετε τις επώνυμες σειρές για να διαπιστώσετε εάν τα έξοδα αποστολής χρεώνονται με την τιμή του προϊόντος:

  1. = (B7 + B5 * C4) * (1 + A3)
  2. =(Χρέωση αποστολής + Τιμή προϊόντος * Ποσότητα) * (1 + Φορολογικός Συντελεστής)

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

Πώς να χρησιμοποιήσω επώνυμες περιοχές στο Excel;

Ως χρηματοοικονομικός αναλυτής, ίσως αναμένεται να πειραματιστείτε με διάφορα επιτόκια. Οτιδήποτε από έναν φορολογικό συντελεστή έως έναν προβλεπόμενο ρυθμό πληθωρισμού μπορεί να χρησιμοποιηθεί ως παράδειγμα. Μπορείτε να χρησιμοποιήσετε Επώνυμα εύρη για να οργανώσετε μεταβλητές που είτε τροποποιούνται σπάνια (όπως Μήνας ή Έτος) είτε θα παραμείνουν στατικές για μεγάλο χρονικό διάστημα (όπως ο ρυθμός πληθωρισμού).

Ακολουθεί μια λίστα με κοινά ονόματα που μπορείτε να χρησιμοποιείτε συχνά όταν εργάζεστε με Named Ranges στο Excel:

  • Ημερομηνία αναφοράς
  • Έτος
  • Μήνας
  • FcstID
  • Φορολογικός συντελεστής
  • RawData

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

Δημιουργία μοναδικών ονομάτων

Η δημιουργία ενός επώνυμου εύρους είναι παιχνιδάκι. Το μόνο που έχετε να κάνετε τώρα είναι να επιλέξετε το(τα) κελί(α) στα οποία θέλετε να αναφερθείτε και να πληκτρολογήσετε ένα όνομα στο Πλαίσιο Ονομάτων.

Επειδή το όνομά σας δεν μπορεί να περιέχει κενά, πρέπει να γράψετε κεφαλαία το πρώτο γράμμα κάθε νέας λέξης ή να χρησιμοποιήσετε μια υπογράμμιση (_) για να διαχωρίσετε όρους. Για να οριστικοποιήσετε τη δημιουργία του Named Range, πατήστε το πλήκτρο ENTER αφού ολοκληρώσετε την πληκτρολόγηση του ονόματος.

Σημείωση: Οποιοδήποτε εύρος με όνομα που έχει δημιουργηθεί με το πλαίσιο ονόματος έχει εύρος βιβλίου εργασίας. Αυτό σημαίνει ότι οποιοδήποτε φύλλο εργασίας στο αρχείο σας Excel μπορεί να έχει πρόσβαση στην ονομαζόμενη περιοχή.

Δημιουργία ονομάτων με χρήση του Name Manager

Μπορείτε να αλλάξετε και να δημιουργήσετε νέες επώνυμες περιοχές στη Διαχείριση ονομάτων (καρτέλα Τύποι > Ομάδα καθορισμένων ονομάτων > κουμπί Διαχείριση ονομάτων) εάν θέλετε να προσαρμόσετε ακόμη περισσότερο τις επώνυμες περιοχές σας.

Θα πρέπει να γνωρίζετε ότι ο Διαχειριστής ονομάτων σάς επιτρέπει:

  • Αλλάξτε το όνομα ενός επώνυμου εύρους που υπάρχει ήδη,
  • Πραγματοποιήστε αλλαγή στον τύπο αναφοράς,
  • Καθορίστε το εύρος των φύλλων εργασίας στα οποία μπορεί να προσπελαστεί το όνομα.

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

Πρακτικά παραδείγματα για το πώς να χρησιμοποιείτε επώνυμες περιοχές

Παράδειγμα 1: Δημιουργία δυναμικού εύρους

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

Παράδειγμα 2: Δημιουργία εύρους 3D

Ένα εύρος 3D είναι ένα εύρος με όνομα που αναφέρεται σε δεδομένα σε πολλά φύλλα εργασίας. Αυτό μπορεί να είναι μια μεγάλη εξοικονόμηση χρόνου, εάν εργάζεστε με μεγάλες ποσότητες δεδομένων που είναι οργανωμένα με παρόμοιο τρόπο σε πολλά φύλλα εργασίας.

Παράδειγμα 3: Δημιουργία ενός ονομασμένου πίνακα

Ένας πίνακας με όνομα είναι ένας τύπος δυναμικής περιοχής που αναφέρεται σε έναν πίνακα τιμών. Αυτός μπορεί να είναι ένας πολύ καλός τρόπος αναφοράς δεδομένων που είναι οργανωμένα σε μορφή πίνακα.

Αυτοματοποίηση εύρους με όνομα με μακροεντολές VBA

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

Προσθήκη εύρους με όνομα

Ο κώδικας VBA παρακάτω δείχνει τον τρόπο κατασκευής διαφόρων ειδών Named Ranges.

Sub NameRange_Add()

'ΣΚΟΠΟΣ: Διάφοροι τρόποι για να δημιουργήσετε ένα επώνυμο εύρος

'ΠΗΓΗ: SoftwareKeep.com


Διαμόρφωση κελιού ως εύρος

Dim rng ως εύρος

Dim RangeName As String

Μειωμένο όνομα κελιού ως συμβολοσειρά


'Αναφορά μεμονωμένου κελιού (Εύρος βιβλίου εργασίας)

RangeName = "Τιμή"

CellName = "D7"

Ορισμός κελιού = Φύλλα εργασίας ("Φύλλο1").Εύρος(Όνομα κελιού)

Αυτό το Βιβλίο Εργασίας.ΟνόματαΠροσθήκη ονόματος:=RangeName, RefersTo:=cell



'Αναφορά μεμονωμένου κελιού (Εύρος φύλλου εργασίας)

RangeName = "Year"

CellName = "A2"

Ορισμός κελιού = Φύλλα εργασίας ("Φύλλο1").Εύρος(Όνομα κελιού)

Φύλλα εργασίας ("Φύλλο1").ΟνόματαΠροσθήκη ονόματος:=RangeName, RefersTo:=cell



'Αναφορά εύρους κελιών (Εύρος βιβλίου εργασίας)

RangeName = "myData"

CellName = "F9:J18"

Ορισμός κελιού = Φύλλα εργασίας ("Φύλλο1").Εύρος(Όνομα κελιού)

Αυτό το Βιβλίο Εργασίας.ΟνόματαΠροσθήκη ονόματος:=RangeName, RefersTo:=cell



'Secret Named Range (δεν εμφανίζεται στο Name Manager)

RangeName = "Όνομα χρήστη"

CellName = "L45"

Ορισμός κελιού = Φύλλα εργασίας ("Φύλλο1").Εύρος(Όνομα κελιού)

Αυτό το Βιβλίο Εργασίας.ΟνόματαΠροσθήκη ονόματος:=RangeName, RefersTo:=cell, Visible:=False


Τέλος υπο

Κάντε βρόχο μέσα από επώνυμες περιοχές

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

Sub NamedRange_Loop()

'ΣΚΟΠΟΣ: Διαγραφή όλων των επώνυμων περιοχών στο ενεργό βιβλίο εργασίας

'ΠΗΓΗ: SoftwareKeep.com


Dim nm ως όνομα


'Κάντε βρόχο σε κάθε ονομαζόμενο εύρος στο βιβλίο εργασίας

Για κάθε nm στο ActiveWorkbook.Ονόματα

Εντοπισμός σφαλμάτων.Εκτύπωση nm.Όνομα, nm.Αναφέρεται σε

Επόμενο nm

'Κάντε βρόχο σε κάθε ονομαζόμενο εύρος εμβέλειας σε ένα συγκεκριμένο φύλλο εργασίας

Για κάθε nm σε φύλλα εργασίας ("Φύλλο1").Ονόματα

Εντοπισμός σφαλμάτων.Εκτύπωση nm.Όνομα, nm.Αναφέρεται σε

Επόμενο nm


Τέλος υπο

Διαγραφή όλων των επώνυμων περιοχών

Αυτή η συνάρτηση VBA θα σας βοηθήσει να καθαρίσετε ένα μεγάλο κομμάτι των Named Ranges στο Excel που δεν χρειάζεστε πλέον στο έργο σας.

Sub NamedRange_DeleteAll()

'ΣΚΟΠΟΣ: Διαγραφή όλων των επώνυμων περιοχών στο ActiveWorkbook (Περιοχές εκτύπωσης προαιρετικές)

'ΠΗΓΗ: SoftwareKeep.com


Dim nm ως όνομα

Αποσβέσιμο Διαγραφή μέτρησης όσο διαρκεί


'Διαγραφή και Print Areas;

UserAnswer = MsgBox("Θέλετε να παρακάμψετε τις περιοχές εκτύπωσης;", vbYesNoCancel)

Εάν UserAnswer = vbYes Τότε SkipPrintAreas = True

Εάν UserAnswer = vbCancel Στη συνέχεια, βγείτε από το Sub


'Εργαλείο χειρισμού σφαλμάτων σε περίπτωση που εμφανιστούν σφάλματα διαγραφής

Σε σφάλμα Μετάβαση σε Παράλειψη


'Κάντε βρόχο σε κάθε όνομα και διαγράψτε

Για κάθε nm στο ActiveWorkbook.Ονόματα

Αν SkipPrintAreas = True And Right(nm.Όνομα, 10) = "Print_Area" Στη συνέχεια Μετάβαση σε Παράλειψη

'Εργαλείο χειρισμού σφαλμάτων σε περίπτωση που εμφανιστούν σφάλματα διαγραφής

Σφάλμα Μετάβαση σε Παράλειψη

'Διαγραφή επώνυμου εύρους

nm.Διαγραφή

DeleteCount = DeleteCount + 1

Παράλειψη:

'Επαναφορά προγράμματος χειρισμού σφαλμάτων

Σε σφάλμα Μετάβαση στο 0

Επόμενο

'Αναφορά αποτελέσματος

Αν DeleteCount = 1 Τότε

MsgBox "Το όνομα [1] καταργήθηκε από αυτό το βιβλίο εργασίας."

Αλλιώς

Τα ονόματα MsgBox "[" & DeleteCount & "] καταργήθηκαν από αυτό το βιβλίο εργασίας."

Τέλος Εάν


Τέλος υπο

Διαγραφή ονομασμένων περιοχών με σφάλματα

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

Sub NamedRange_DeleteErrors()

'ΣΚΟΠΟΣ: Διαγραφή όλων των επώνυμων περιοχών με σφάλμα #REF στο ActiveWorkbook

'ΠΗΓΗ: SoftwareKeep.com


Dim nm ως όνομα

Αποσβέσιμο Διαγραφή μέτρησης όσο διαρκεί


'Κάντε βρόχο σε κάθε όνομα και διαγράψτε

Για κάθε nm στο ActiveWorkbook.Ονόματα

Εάν InStr(1, nm.RefersTo, "#REF!") > 0 Στη συνέχεια

'Εργαλείο χειρισμού σφαλμάτων σε περίπτωση που εμφανιστούν σφάλματα διαγραφής

Σφάλμα Μετάβαση σε Παράλειψη

'Διαγραφή επώνυμου εύρους

nm.Διαγραφή

DeleteCount = DeleteCount + 1

Τέλος Εάν

Παράλειψη:

'Επαναφορά προγράμματος χειρισμού σφαλμάτων

Σε σφάλμα Μετάβαση στο 0

Επόμενο

'Αναφορά αποτελέσματος

Αν DeleteCount = 1 Τότε

MsgBox "Το όνομα σφάλματος [1] καταργήθηκε από αυτό το βιβλίο εργασίας."

Αλλιώς

Τα ονόματα σφαλμάτων MsgBox "[" & DeleteCount & "] καταργήθηκαν από αυτό το βιβλίο εργασίας."

Τέλος Εάν

Τέλος υπο

TL;DR

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

Συμπέρασμα

Το Excel είναι ένα εκπληκτικό εργαλείο που μπορεί να κάνει ακόμα και τις πιο πεζές εργασίες συναρπαστικές με τεράστιες δυνατότητες αυτοματισμού. Αν θέλετε να κάνετε τη ζωή σας πιο εύκολη, το να μάθετε πώς να εργάζεστε με προηγμένα εργαλεία όπως το Named Ranges με το VBA είναι ένας πολύ καλός τρόπος για να ξεκινήσετε.

Ελπίζουμε ότι αυτό το άρθρο σας βοήθησε να μάθετε λίγα περισσότερα σχετικά με τον τρόπο χρήσης των Named Ranges στο Excel. Όπως πάντα, εάν έχετε οποιεσδήποτε ερωτήσεις, μη διστάσετε να μας αφήσετε ένα σχόλιο παρακάτω!

Σας ευχαριστώ που διαβάσατε.

Ένα ακόμη πράγμα

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

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

Προτεινόμενα άρθρα

» Πώς να προσθέσετε και να αφαιρέσετε τα κύρια μηδενικά στο Excel
» Πώς να χρησιμοποιήσετε τους τύπους "Εάν το κελί περιέχει" στο Excel
» Πώς να κλειδώσετε και να ξεκλειδώσετε το κλείδωμα κύλισης στο Excel;

Μπορείτε να επικοινωνήστε με ερωτήσεις ή αιτήματα που θέλετε να καλύψουμε.