Betingelser
Nu har vi lært at stille spørgsmål til brugeren - så skal vi også kunne reagere på det. Til det brug har vi flere muligheder:
If betingelse Then
Kommandoer
Else
Kommandoer
End if
If betingelse Then
Kommandoer
Elseif ny betingelse Then
Kommandoer
Else
Kommandoer
End if
Select Case Variabel
Case værdi
Kommandoer
Case værdi
Kommandoer
Case værdi
Kommandoer
Case værdi
Kommandoer
Case Else
Kommandoer
End Select
Bemærk, at det er god kodestil, at lave indryk, så man kan se hvordan If og End if hænger sammen.
Man kan også holde if sætningerne på én linje hvis man kun har én kommendo i linjen - det gør koden lidt mere kompakt og måske letter at læse...
If betingelse Then Kommando
If betingelse Then Kommando Else Kommando
Og der findes også en funktion, der minder om Excel's hvis funktion
Iif(Betingelse, sand værdi, falsk værdi)
stBesked = IIf(stLand = "Danmark", "Hej med dig", "Hello")
Et eksempel på anvendelse af If sammen med f.eks. MsgBox kunne se sådan her ud:
Bemærk, at der igen dukkede én af disse indbyggede konstanter op (vbYes). Hvis du gerne vil se alle de konstanter, der er defineret i VBA skal du trykke på F1 for at komme ind i hjælpefunktionen. Hvis du vælger Contents fanen hedder den første kategori Constants og her kan du finde alle de konstanter der er defineret i VBA.
Og et eksempel på Select Case konstruktionen kunne se sådan her ud: