Einführung "VBA mit Microsoft Office"

If .. Then .. Else .. End If

Herdt EX2003P K8.4/S.86

Mit If .. Then .. End If wird Code nur ausgeführt, wenn eine Bedingung erfüllt ist.

If intZahl > 10 Then
  MsgBox "Die Zahl ist zu gross"
  intZahl = 10
End If

Mit If .. Then .. Else .. End If wird zusätzlich alternativer Code ausgeführt, wenn die Bedingung nicht erfüllt ist. 

If intZahl <= 10 Then
    MsgBox "Die Zahl ist <= 10"
Else
  MsgBox "Die Zahl ist > 10"
End If