Declarația If Then | Declarație Altfel
Folosește Dacă declarația Then în Excel VBA pentru a executa linii de cod dacă este îndeplinită o anumită condiție.
Declarația If Then
Plasați un buton de comandă pe foaia de lucru și adăugați următoarele linii de cod:
Reduceți scorul ca întreg, rezultați ca șir
scor = Interval ("A1"). Valoare
Dacă scorul> = 60, atunci rezultatul = "trece"
Interval ("B1"). Valoare = rezultat
Explicație: dacă scorul este mai mare sau egal cu 60, Excel VBA returnează trecerea.
Rezultatul când faceți clic pe butonul de comandă de pe foaie:
Notă: dacă scorul este mai mic de 60, Excel VBA plasează valoarea rezultatului variabilei goale în celula B1.
Declarație Altfel
Plasați un buton de comandă pe foaia de lucru și adăugați următoarele linii de cod:
Reduceți scorul ca întreg, rezultați ca șir
scor = Interval ("A1"). Valoare
Dacă scor> = 60 Atunci
result = "trece"
Altfel
result = "esueaza"
End If
Interval ("B1"). Valoare = rezultat
Explicație: dacă scorul este mai mare sau egal cu 60, Excel VBA returnează trecerea, altfel Excel VBA returnează eșuează.
Rezultatul când faceți clic pe butonul de comandă de pe foaie:
Notă: numai dacă aveți o singură linie de cod după Then și nicio instrucțiune Else, este permis să plasați o linie de cod direct după Then și să omiteți (lăsați afară) End If (primul exemplu). În caz contrar, începeți o nouă linie după cuvintele Then și Else și terminați cu End If (al doilea exemplu).