Λογικοί χειριστές Excel VBA - Εύκολες μακροεντολές Excel

Πίνακας περιεχομένων

Λογικός χειριστής Και | Λογικός χειριστής | | Λογικός χειριστής Όχι

Τα τρία πιο χρησιμοποιημένα λογικοί τελεστές σε Excel VBA είναι: Και, and και Όχι. Όπως πάντα, θα χρησιμοποιήσουμε εύκολα παραδείγματα για να κάνουμε τα πράγματα πιο ξεκάθαρα.

Λογικός χειριστής And

Τοποθετήστε ένα κουμπί εντολών στο φύλλο εργασίας σας και προσθέστε τις ακόλουθες γραμμές κώδικα:

Dim σκορ1 Ως ακέραιος, σκορ2 ως ακέραιος, αποτέλεσμα ως συμβολοσειρά
score1 = Εύρος ("A1"). Τιμή
score2 = Εύρος ("B1"). Τιμή
Αν σκορ1> = 60 Και σκορ2> 1 Τότε
αποτέλεσμα = "πέρασμα"
Αλλού
αποτέλεσμα = "αποτυχία"
Τέλος εαν
Εύρος ("C1"). Τιμή = αποτέλεσμα

Επεξήγηση: εάν η βαθμολογία 1 είναι μεγαλύτερη ή ίση με 60 και η βαθμολογία 2 είναι μεγαλύτερη από 1, το Excel επιστρέφει το VBA, αλλιώς οι αποδόσεις του Excel VBA αποτυγχάνουν.

Αποτέλεσμα όταν κάνετε κλικ στο κουμπί εντολών στο φύλλο:

Συμπέρασμα: Οι αποδόσεις του Excel VBA αποτυγχάνουν επειδή η βαθμολογία2 δεν είναι μεγαλύτερη από 1.

Λογικός χειριστής Or

Τοποθετήστε ένα κουμπί εντολών στο φύλλο εργασίας σας και προσθέστε τις ακόλουθες γραμμές κώδικα:

Dim σκορ1 Ως ακέραιος, σκορ2 ως ακέραιος, αποτέλεσμα ως συμβολοσειρά
score1 = Range ("A1"). Τιμή
score2 = Εύρος ("B1"). Τιμή
Αν σκορ1> = 60 score βαθμολογία2> 1 Τότε
αποτέλεσμα = "πέρασμα"
Αλλού
αποτέλεσμα = "αποτυχία"
Τέλος εαν
Εύρος ("C1"). Τιμή = αποτέλεσμα

Επεξήγηση: εάν η βαθμολογία1 είναι μεγαλύτερη ή ίση με 60 ή η βαθμολογία2 είναι μεγαλύτερη από 1, το Excel επιστρέφει το VBA, διαφορετικά οι αποδόσεις του Excel VBA αποτυγχάνουν.

Αποτέλεσμα όταν κάνετε κλικ στο κουμπί εντολών στο φύλλο:

Συμπέρασμα: Το Excel VBA επιστρέφει το πάσο επειδή η βαθμολογία 1 είναι μεγαλύτερη ή ίση με 60.

Λογικός χειριστής Όχι

Τοποθετήστε ένα κουμπί εντολών στο φύλλο εργασίας σας και προσθέστε τις ακόλουθες γραμμές κώδικα:

Dim σκορ1 Ως ακέραιος, σκορ2 ως ακέραιος, αποτέλεσμα ως συμβολοσειρά
score1 = Range ("A1"). Τιμή
score2 = Εύρος ("B1"). Τιμή
Αν σκορ1> = 60 Και Όχι βαθμολογία2 = 1 Τότε
αποτέλεσμα = "πέρασμα"
Αλλού
αποτέλεσμα = "αποτυχία"
Τέλος εαν
Εύρος ("C1"). Τιμή = αποτέλεσμα

Επεξήγηση: εάν η βαθμολογία 1 είναι μεγαλύτερη ή ίση με 60 και η βαθμολογία 2 δεν είναι ίση με 1, το Excel επιστρέφει το VBA, ενώ οι αποδόσεις του Excel VBA αποτυγχάνουν.

Αποτέλεσμα όταν κάνετε κλικ στο κουμπί εντολών στο φύλλο:

Συμπέρασμα: Οι αποδόσεις του Excel VBA αποτυγχάνουν επειδή η βαθμολογία2 είναι ίση με 1.

Θα βοηθήσει στην ανάπτυξη του τόπου, μοιράζονται τη σελίδα με τους φίλους σας

wave wave wave wave wave