Če potem izjava | Druga izjava
Uporabi Izjava If then v Excel VBA za izvajanje kodnih vrstic, če je izpolnjen določen pogoj.
Če potem izjava
Na delovni list postavite ukazni gumb in dodajte naslednje kodne vrstice:
Zatemni rezultat kot celo število, rezultat kot niz
score = Range ("A1"). Vrednost
Če je rezultat> = 60, potem je rezultat = "pass"
Razpon ("B1"). Vrednost = rezultat
Pojasnilo: če je rezultat večji ali enak 60, Excel VBA vrne prelaz.
Rezultat, ko kliknete ukazni gumb na listu:
Opomba: če je rezultat manjši od 60, Excel VBA vnese vrednost rezultata prazne spremenljivke v celico B1.
Druga izjava
Na delovni list postavite ukazni gumb in dodajte naslednje kodne vrstice:
Zatemni rezultat kot celo število, rezultat kot niz
score = Razpon ("A1"). Vrednost
Če je rezultat> = 60, potem
result = "pass"
Sicer pa
result = "fail"
Konec Če
Razpon ("B1"). Vrednost = rezultat
Pojasnilo: če je rezultat večji ali enak 60, Excel VBA vrne prehod, v nasprotnem primeru Excel VBA ne uspe.
Rezultat, ko kliknete ukazni gumb na listu:
Opomba: samo če imate eno vrstico kode za Potem in nobenega stavka Else, je dovoljeno postaviti kodno vrstico neposredno za Potem in izpustiti (izpustiti) End If (prvi primer). V nasprotnem primeru začnite novo vrstico za besedama Potem in Sicer in končajte z End If (drugi primer).