/ / / Excel VBA Εάν Στη συνέχεια Δήλωση

Excel VBA Εάν Στη συνέχεια Δήλωση

Εάν Στη συνέχεια δήλωση | Άλλες δηλώσεις

Χρησιμοποιήστε το Εάν η εντολή Μετά σε Excel VBA για την εκτέλεση γραμμών κώδικα εάν ικανοποιείται συγκεκριμένη συνθήκη.

Εάν Στη συνέχεια δήλωση

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

Dim score As Integer, result As String
score = Range("A1").Value

If score >= 60 Then result = "pass"

Range("B1").Value = result

Επεξήγηση: Εάν η βαθμολογία είναι μεγαλύτερη ή ίση με 60, το Excel VBA επιστρέφει.

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

Excel VBA Εάν Στη συνέχεια Δήλωση

Σημείωση: Εάν η βαθμολογία είναι μικρότερη από 60, το Excel VBA τοποθετεί την τιμή του κενού μεταβλητού αποτελέσματος στο κελί B1.

Άλλες δηλώσεις

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

Dim score As Integer, result As String
score = Range("A1").Value

If score >= 60 Then
    result = "pass"
Else
    result = "fail"
End If

Range("B1").Value = result

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

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

Άλλες δηλώσεις του Excel VBA

Σημείωση: μόνο εάν έχετε μία γραμμή κώδικα μετά από το "Τότε" και καμία δήλωση "Else", επιτρέπεται η τοποθέτηση μιας γραμμής κώδικα αμέσως μετά και στη συνέχεια να παραλειφθεί (End of If) (πρώτο παράδειγμα). Διαφορετικά, ξεκινήστε μια νέα γραμμή μετά τις λέξεις "Τότε και άλλος" και τελειώστε με End If (δεύτερο παράδειγμα).

Επίσης διαβάστε: