Ako tada izjava | Izjava o drugom
Koristiti Izjava If u Excel VBA za izvršavanje linija koda ako je ispunjen određeni uvjet.
Ako tada izjava
Postavite naredbeni gumb na radni list i dodajte sljedeće retke koda:
Zatamni rezultat kao cijeli broj, rezultat kao niz
score = Raspon ("A1"). Vrijednost
Ako je rezultat> = 60, tada je rezultat = "proći"
Raspon ("B1"). Vrijednost = rezultat
Objašnjenje: ako je rezultat veći ili jednak 60, Excel VBA vraća prolaz.
Rezultat kada pritisnete naredbeni gumb na listu:
Napomena: ako je rezultat manji od 60, Excel VBA postavlja vrijednost rezultata prazne varijable u ćeliju B1.
Izjava o drugom
Postavite naredbeni gumb na radni list i dodajte sljedeće retke koda:
Zatamni rezultat kao cijeli broj, rezultat kao niz
score = Raspon ("A1"). Vrijednost
Ako je rezultat> = 60, tada
rezultat = "proći"
Drugo
rezultat = "neuspjeh"
Završi ako
Raspon ("B1"). Vrijednost = rezultat
Objašnjenje: ako je rezultat veći ili jednak 60, Excel VBA vraća prolaz, u suprotnom Excel VBA vraća neuspješno.
Rezultat kada pritisnete naredbeni gumb na listu:
Napomena: samo ako imate jedan kodni redak nakon Tada, a nema naredbe Else, dopušteno je postaviti kodni redak neposredno nakon Tada i izostaviti (izostaviti) Kraj If (prvi primjer). U protivnom započnite novi redak iza riječi Then i Else i završite s End If (drugi primjer).