Πώς να χρησιμοποιήσετε το VBA για να εμφανίσετε τα ενσωματωμένα πλαίσια διαλόγου του Excel 2016

Ο προγραμματιστής VBA μπορεί να είναι συντριπτικός κατά καιρούς. Ένας τρόπος να εξετάσουμε το VBA είναι ότι είναι ένα εργαλείο που σας επιτρέπει να μιμείται τις εντολές του Excel. Για παράδειγμα, εξετάστε αυτή τη δήλωση VBA:

Εύρος ("A1: A12"). Name = "MonthNames"

Η εκτέλεση της εν λόγω δήλωσης VBA έχει το ίδιο αποτέλεσμα με την επιλογή Formule → Defined Names → Define Name για να εμφανιστεί το παράθυρο διαλόγου New Name, πληκτρολογώντας MonthNames στο πλαίσιο Name και A1: A12 στο πλαίσιο Refers to πατήστε OK.

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

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

Εμφάνιση ενός από τα παράθυρα διαλόγου του Excel χρησιμοποιώντας το VBA.

Εφαρμογή. CommandBars. ExecuteMso "NameDefine"

Ο κωδικός VBA σας δεν μπορεί να πάρει καμία πληροφορία από το παράθυρο διαλόγου. Για παράδειγμα, αν εκτελείτε τον κώδικα για να εμφανίσετε το παράθυρο διαλόγου Νέο όνομα, ο κωδικός σας δεν μπορεί να πάρει το όνομα που εισήγαγε ο χρήστης ή η περιοχή που ονομάζεται.

Το ExecuteMso είναι μια μέθοδος του αντικειμένου CommandBars και δέχεται ένα όρισμα: μια παράμετρο idMso που αντιπροσωπεύει ένα κορδέλα ελέγχου. Δυστυχώς, αυτές οι παράμετροι δεν εμφανίζονται στο σύστημα Βοήθειας. Και επειδή η Κορδέλα δεν υπήρχε για πάντα, ο κώδικας που χρησιμοποιεί τη μέθοδο ExecuteMso δεν είναι συμβατός με τις εκδόσεις πριν από το Excel 2007.

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

Εφαρμογή. CommandBars. ExecuteMso 

"FormatCellsFontDialog"

Αν προσπαθήσετε να εμφανίσετε ένα ενσωματωμένο παράθυρο διαλόγου σε εσφαλμένο περιβάλλον, το Excel εμφανίζει ένα μήνυμα σφάλματος. Για παράδειγμα, εδώ είναι μια δήλωση που εμφανίζει το παράθυρο διαλόγου Format Number:

Application. CommandBars. ExecuteMso "NumberFormatsDialog"

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

Το Excel έχει χιλιάδες εντολές. Πώς μπορείτε να βρείτε το όνομα εκείνου που χρειάζεστε; Ένας τρόπος είναι να χρησιμοποιήσετε την καρτέλα Προσαρμογή κορδέλας στο παράθυρο διαλόγου Επιλογές του Excel. Ο γρήγορος τρόπος για να φτάσετε εκεί είναι να κάνετε δεξί κλικ σε οποιοδήποτε έλεγχο Ribbon και να επιλέξετε Προσαρμογή της Κορδέλας από το μενού συντόμευσης.

Σχεδόν κάθε εντολή που είναι διαθέσιμη στο Excel παρατίθεται στον αριστερό πίνακα. Βρείτε την εντολή που χρειάζεστε και τοποθετήστε το δείκτη του ποντικιού πάνω από αυτό και δείτε το μυστικό του όνομα εντολής στη συμβουλή εργαλείου (είναι το τμήμα στις παρενθέσεις).

Χρησιμοποιώντας την καρτέλα Προσαρμογή κορδέλας για να προσδιορίσετε ένα όνομα εντολής.