Αν Στη συνέχεια Δήλωση | Άλλη Δήλωση
Χρησιμοποιήστε το Αν τότε δήλωση σε Excel VBA για την εκτέλεση γραμμών κώδικα εάν πληρούται μια συγκεκριμένη συνθήκη.
Αν Στη συνέχεια Δήλωση
Τοποθετήστε ένα κουμπί εντολών στο φύλλο εργασίας σας και προσθέστε τις ακόλουθες γραμμές κώδικα:
Χαμηλή βαθμολογία ως ακέραιος, αποτέλεσμα ως συμβολοσειρά
σκορ = Εύρος ("A1"). Τιμή
Αν σκορ> = 60 Τότε αποτέλεσμα = "πέρασμα"
Εύρος ("Β1"). Τιμή = αποτέλεσμα
Επεξήγηση: εάν η βαθμολογία είναι μεγαλύτερη ή ίση με 60, το Excel VBA επιστρέφει.
Αποτέλεσμα όταν κάνετε κλικ στο κουμπί εντολών στο φύλλο:
Σημείωση: εάν η βαθμολογία είναι μικρότερη από 60, το Excel VBA τοποθετεί την τιμή του αποτελέσματος της κενής μεταβλητής στο κελί Β1.
Άλλη Δήλωση
Τοποθετήστε ένα κουμπί εντολών στο φύλλο εργασίας σας και προσθέστε τις ακόλουθες γραμμές κώδικα:
Χαμηλή βαθμολογία ως ακέραιος, αποτέλεσμα ως συμβολοσειρά
σκορ = Εύρος ("A1"). Τιμή
Αν σκορ> = 60 Τότε
αποτέλεσμα = "πέρασμα"
Αλλού
αποτέλεσμα = "αποτυχία"
Τέλος εαν
Εύρος ("Β1"). Τιμή = αποτέλεσμα
Επεξήγηση: εάν η βαθμολογία είναι μεγαλύτερη ή ίση με 60, το Excel επιστρέφει το VBA, αλλιώς οι αποδόσεις του Excel VBA αποτυγχάνουν.
Αποτέλεσμα όταν κάνετε κλικ στο κουμπί εντολών στο φύλλο:
Σημείωση: μόνο εάν έχετε μία γραμμή κώδικα μετά το Τότε και καμία άλλη δήλωση, επιτρέπεται να τοποθετήσετε μια γραμμή κώδικα αμέσως μετά το Τότε και να παραλείψετε (αφήσετε έξω) Τέλος Αν (πρώτο παράδειγμα). Διαφορετικά, ξεκινήστε μια νέα γραμμή μετά τις λέξεις Στη συνέχεια και το άλλο και τελειώστε με το Τέλος Αν (δεύτερο παράδειγμα).
