Εάν έχετε περισσότερα από ένα κουμπιά επιλογών, μπορείτε να επιλέξετε μόνο ένα από τα κουμπιά επιλογών. Για να δημιουργήσω κουμπιά επιλογών σε Excel VBA, εκτελέστε τα παρακάτω βήματα.
1. Στην καρτέλα Προγραμματιστής, κάντε κλικ στην επιλογή Εισαγωγή.
2. Στην ομάδα στοιχείων ελέγχου ActiveX, κάντε κλικ στο κουμπί Επιλογή.
3. Σύρετε δύο κουμπιά επιλογών στο φύλλο εργασίας σας.
4. Κάντε δεξί κλικ στο κουμπί πρώτης επιλογής (βεβαιωθείτε ότι είναι επιλεγμένη η λειτουργία λειτουργίας σχεδίασης).
5. Κάντε κλικ στην επιλογή Προβολή κώδικα.
Σημείωση: μπορείτε να αλλάξετε τη λεζάντα και το όνομα ενός στοιχείου ελέγχου κάνοντας δεξί κλικ στο στοιχείο ελέγχου (βεβαιωθείτε ότι έχει επιλεγεί η λειτουργία σχεδίασης) και, στη συνέχεια, κάνοντας κλικ στην επιλογή Ιδιότητες. Αλλάξτε τους υπότιτλους των κουμπιών επιλογής σε Γυναίκα και Άντρας. Προς το παρόν, θα αφήσουμε το OptionButton1 και το OptionButton2 ως ονόματα των κουμπιών επιλογής.
6. Προσθέστε την ακόλουθη γραμμή κωδικού:
Εάν OptionButton1.Value = True then Range ("D3"). Τιμή = 10
7. Κάντε δεξί κλικ στο κουμπί δεύτερης επιλογής (βεβαιωθείτε ότι είναι επιλεγμένη η λειτουργία σχεδίασης).
8. Κάντε κλικ στην επιλογή Προβολή κώδικα.
9. Προσθέστε την ακόλουθη γραμμή κωδικού:
Εάν OptionButton2.Value = True then Range ("D3"). Τιμή = 20
10. Κάντε κλικ στα κουμπιά επιλογών στο φύλλο (βεβαιωθείτε ότι έχει αποεπιλεγεί η λειτουργία σχεδίασης).
Αποτέλεσμα:
Αν και σε ορισμένες περιπτώσεις μπορεί να είναι χρήσιμο να τοποθετήσετε απευθείας κουμπιά επιλογών στο φύλλο εργασίας σας, τα κουμπιά επιλογών είναι ιδιαίτερα χρήσιμα όταν τοποθετούνται σε μια φόρμα χρήστη.
