Στο VBA, μπορείτε να δημιουργήσετε ένα CheckBox όπου ένας χρήστης μπορεί να ελέγξει ή να καταργήσει την επιλογή. Ένα πλαίσιο ελέγχου χρησιμοποιείται συχνά σε φόρμες χρηστών, αλλά μπορεί επίσης να χρησιμοποιηθεί σε φύλλο εργασίας. Σε αυτό το σεμινάριο, θα μάθετε πώς να δημιουργείτε ένα πλαίσιο ελέγχου, να λαμβάνετε μια επιλογή χρήστη στο VBA και να το χρησιμοποιείτε σε κώδικα.
Αν θέλετε να μάθετε πώς να δημιουργείτε ένα Listbox, κάντε κλικ εδώ: VBA Listbox
Αν θέλετε να μάθετε πώς να δημιουργείτε ένα Combobox, κάντε κλικ εδώ: VBA Combobox
Δημιουργήστε ένα πλαίσιο ελέγχου
Για να εισαγάγετε ένα πλαίσιο ελέγχου στο φύλλο εργασίας, πρέπει να μεταβείτε στο Καρτέλα προγραμματιστή, Κάντε κλικ Εισάγετε και κάτω από τα στοιχεία ελέγχου ActiveX επιλέξτε Πλαίσιο ελέγχου:
Εικόνα 1. Εισαγάγετε ένα πλαίσιο ελέγχου στο φύλλο εργασίας
Όταν επιλέγετε το πλαίσιο ελέγχου που έχετε εισαγάγει, μπορείτε να κάνετε κλικ στο Ιδιότητες σύμφωνα με το Καρτέλα προγραμματιστή:
Εικόνα 2. Αλλαγή ιδιοτήτων πλαισίου ελέγχου
Εδώ μπορείτε να ορίσετε διαφορετικές ιδιότητες του πλαισίου ελέγχου. Στην αρχή, αλλάξαμε το χαρακτηριστικό Ονομα προς το cmbCheckboxΤο Τώρα, μπορούμε να χρησιμοποιήσουμε το πλαίσιο ελέγχου με αυτό το όνομα σε κώδικα VBA.
Επίσης, αλλάξαμε το κείμενο που εμφανίζεται δίπλα στο πλαίσιο ελέγχου σε Συμφωνείτε με τους ΌρουςΤο Για να γίνει αυτό, πρέπει να ορίσετε το χαρακτηριστικό Λεζάντα.
Λάβετε ένα επιλεγμένο στοιχείο ενός πλαισίου ελέγχου στο VBA
Ο σκοπός ενός πλαισίου ελέγχου είναι να πάρει μια επιλογή χρηστών (το πλαίσιο ελέγχου είναι επιλεγμένο ή όχι). Για να ανακτήσετε μια τιμή που έχει επιλεγεί από τον χρήστη, πρέπει να χρησιμοποιήσετε αυτόν τον κωδικό:
| 123456789 | Εάν Sheet1.chbCheckBox.Value = True ΤότεSheet1.Range ("C3") = "Συμφωνώ"ΑλλούSheet1.Range ("C3") = "Δεν συμφωνώ"Τέλος εαν |
Θέλουμε να συμπληρώσουμε το κελί C3 με Συμφωνώ εάν το πλαίσιο ελέγχου είναι επιλεγμένο και Μην συμφωνείτε σε διαφορετική περίπτωση. Η τιμή του πλαισίου ελέγχου βρίσκεται στοαξία χαρακτηριστικό του αντικειμένου Sheet1.chbCheckboxΤο Η τιμή του πλαισίου ελέγχου μπορεί να είναι αληθής ή ψευδής.
Εικόνα 3. Λάβετε μια επιλεγμένη τιμή από το πλαίσιο ελέγχου στο VBA
Καθώς επιλέξαμε το πλαίσιο ελέγχου, η τιμή του Sheet1.chbCheckbox.Value είναι αλήθεια, άρα το αποτέλεσμα στο C3 είναι Συμφωνώ.
Χρησιμοποιήστε ένα πλαίσιο ελέγχου σε μια φόρμα χρήστη
Όπως αναφέραμε, το πλαίσιο ελέγχου χρησιμοποιείται συχνότερα στις φόρμες χρηστών. Για να εξηγήσουμε πώς μπορείτε να το κάνετε, θα εισαγάγουμε πρώτα μια φόρμα χρήστη. Στο πρόγραμμα επεξεργασίας VBA, κάντε δεξί κλικ στο όνομα μονάδας, κάντε κλικ στο Εισάγετε και επιλέξτε UserForm:
Εικόνα 8. Εισαγάγετε μια φόρμα χρήστη
Για να εμφανίσετε στοιχεία ελέγχου για εισαγωγή, πρέπει να ενεργοποιήσετε το ΕργαλειοθήκηΤο Για να το κάνετε αυτό, κάντε κλικ στοΕργαλειοθήκη εικονίδιο στη γραμμή εργαλείων. Μετά από αυτό, θα λάβετε τα παράθυρα με όλα τα διαθέσιμα στοιχεία ελέγχου. Μπορείτε να κάνετε κλικ στο Πλαίσιο ελέγχου για να το δημιουργήσετε στο Userform:
Εικόνα 9. Εισαγάγετε ένα πλαίσιο ελέγχου στη φόρμα χρήστη
Στο παράθυρο ιδιοτήτων, θα αλλάξουμε το όνομα του πλαισίου ελέγχου σε chbCheckBox και λεζάντα για Συμφωνείτε με τους ΌρουςΤο Όταν εκτελούμε το Userform, παίρνουμε το πλαίσιο ελέγχου σε αυτό.
Εικόνα 10. Το πλαίσιο ελέγχου στο Userform
Εάν θέλετε να λάβετε την επιλεγμένη τιμή από το πλαίσιο ελέγχου, πρέπει να χρησιμοποιήσετε την ίδια λογική για το πλαίσιο ελέγχου σε ένα φύλλο εργασίας, το οποίο εξηγείται νωρίτερα στο άρθρο.
