Σε αυτό το άρθρο, θα σας δείξω πώς μπορείτε να αναπτύξετε και να χρησιμοποιήσετε ένα Ναι Όχι πλαίσιο μηνυμάτων στο VBA στο Excel.

Ανάπτυξη και χρήση ενός πλαισίου μηνυμάτων Ναι Όχι με το Excel VBA (Γρήγορη προβολή)

 Sub Yes_No_Message_Box() Answer = MsgBox("Do You Like ExcelWIKI?", vbYesNo) If Answer = vbYes Then Range("C3") = Range("C3") + 1 ElseIf Answer = vbNo Then Range("C4") = Range("C4") + 1 End If End Sub 

Κατεβάστε το βιβλίο ασκήσεων

Κατεβάστε αυτό το τετράδιο ασκήσεων για να εξασκηθείτε ενώ διαβάζετε αυτό το άρθρο.

Επισκόπηση του κώδικα VBA για την ανάπτυξη και χρήση ενός πλαισίου μηνυμάτων Ναι Όχι (ανάλυση βήμα προς βήμα)

Ας μάθουμε τη χρήση ενός πλαίσιο μηνυμάτων ναι-όχι με ένα απλό παράδειγμα. πλαίσιο μηνυμάτων θα σας κάνω μια ερώτηση, σας αρέσει το ExcelWIKI;

Εάν η απάντησή σας είναι ναι, θα κάνετε κλικ στο Ναι στο πλαίσιο μηνυμάτων . Και αν η απάντησή σας είναι Όχι , θα κάνετε κλικ Όχι .

Τώρα, τι θα συμβεί αφού κάνετε κλικ στο ναι ή στο όχι στο πεδίο πλαίσιο μηνυμάτων ? Στο ενεργό φύλλο εργασίας, υπάρχουν 2 κελιά που περιέχουν τον αριθμό των ατόμων που τους αρέσει και δεν τους αρέσει το ExcelWIKI. Αν πατήσετε ναι , ο αριθμός στο όμοιο κελί θα αυξηθεί κατά ένα.

Και αν χτυπήσετε όχι , ο αριθμός στο αντίθετο κελί θα αυξηθεί κατά ένα.

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

• Αναπτύσσοντας το Πλαίσιο μηνυμάτων Ναι-Όχι
• Χρήση της εξόδου του Πλαίσιο μηνυμάτων

Δείχνω τις λεπτομέρειες κάθε βήματος για τη μάθησή σας.

⧪ Βήμα 1: Ανάπτυξη του πλαισίου μηνυμάτων Ναι-Όχι

Πρώτα απ' όλα, πρέπει να δημιουργήσετε το μήνυμα ναι-όχι κουτί σε VBA Αυτό είναι εύκολο. Χρησιμοποιήστε την ίδια διαδικασία με το συνηθισμένο πλαίσιο μηνυμάτων, με την ερώτηση σχετικά με το επιχείρημα, μαζί με ένα νέο επιχείρημα vbYesNo .

Εδώ το ερώτημα είναι, "Σας αρέσει το ExcelWIKI;"

 Απάντηση = MsgBox("Σας αρέσει το ExcelWIKI;", vbYesNo) 

⧪ Βήμα 2: Χρήση της εξόδου του πλαισίου μηνυμάτων

Στη συνέχεια, θα εκτελέσουμε μια εργασία χρησιμοποιώντας το πλαίσιο μηνυμάτων έξοδος. Εδώ, το κύτταρο C3 περιέχει τον αριθμό των ατόμων που τους αρέσει το ExcelWIKI, και το κελί C4 περιέχει τον αριθμό των ατόμων που δεν τους αρέσει το ExcelWIKI.

Έτσι, εάν η απάντηση είναι Ναι , κελί C3 θα αυξηθεί κατά ένα. Και αν είναι Όχι , κελί C4 θα αυξηθεί κατά ένα.

Θα χρησιμοποιήσουμε ένα If-block για να το εκτελέσετε αυτό.

 If Answer = vbYes Then Range("C3") = Range("C3") + 1 ElseIf Answer = vbNo Then Range("C4") = Range("C4") + 1 End If 

Έτσι η πλήρης VBA ο κωδικός θα είναι:

⧭ Κωδικός VBA:

 Sub Yes_No_Message_Box() Answer = MsgBox("Do You Like ExcelWIKI?", vbYesNo) If Answer = vbYes Then Range("C3") = Range("C3") + 1 ElseIf Answer = vbNo Then Range("C4") = Range("C4") + 1 End If End Sub 

Δημιουργία της μακροεντολής για την ανάπτυξη και χρήση ενός πλαισίου μηνυμάτων Ναι Όχι στο Excel

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

⧪ Βήμα 1: Άνοιγμα του παραθύρου VBA

Τύπος ALT + F11 στο πληκτρολόγιό σας για να ανοίξετε το Visual Basic παράθυρο.

⧪ Βήμα 2: Εισαγωγή νέας ενότητας

Πηγαίνετε στο Εισαγωγή> Ενότητα στη γραμμή εργαλείων. Κάντε κλικ στο Ενότητα Μια νέα ενότητα που ονομάζεται Ενότητα1 (ή οτιδήποτε άλλο ανάλογα με το ιστορικό σας) θα ανοίξει.

⧪ Βήμα 3: Τοποθέτηση του κώδικα VBA

Αυτό είναι το πιο σημαντικό βήμα. VBA κώδικα στην ενότητα.

⧪ Βήμα 4: Εκτέλεση του κώδικα

Κάντε κλικ στο Εκτέλεση Sub / UserForm από την παραπάνω γραμμή εργαλείων.

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

Εάν επιλέξετε Ναι , ο αριθμός στο κελί C3 θα αυξηθεί κατά ένα. Και αν επιλέξετε Όχι , ο αριθμός στο κελί C4 θα αυξηθεί κατά ένα.

Εδώ, έχω επιλέξει ναι , οπότε ο αριθμός των ατόμων που τους αρέσει ExcelWIKI έχει αυξηθεί κατά ένα.

Πράγματα που πρέπει να θυμάστε

• A πλαίσιο μηνυμάτων στο VBA περιέχει συνολικά 4 παράμετροι που ονομάζονται Προτροπή, κουμπί, τίτλος , και Βοηθητικό αρχείο . Εδώ έχω δείξει μόνο 2 παράμετροι, Προτροπή και Κουμπί . Αλλά αν θέλετε να ανακαλύψετε το Πλαίσιο μηνυμάτων VBA με περισσότερες λεπτομέρειες, μπορείτε να ελέγξετε αυτόν τον σύνδεσμο.