Einführung "VBA mit Microsoft Office"

If .. Then .. ElseIf .. Else .. End If

Herdt EX2003P K8.4/S.91

Wenn mehr als eine Bedingung geprüft werden soll, dann lässt sich Select Case oder If .. ElseIf einsetzen. Select Case prüft normalerweise auf Gleichheit. Mit Is und To kann Select auch Grössenvergleiche machen, ist allerdings komplizierter als If.

If intZahl < 10 Then
  MsgBox "Die Zahl ist kleiner 10"
ElseIf intZahl < 20 Then
  MsgBox "Die Zahl ist kleiner 20"
ElseIf intZahl < 30 Then
  MsgBox "Die Zahl ist kleiner 30"
Else 
  MsgBox "Die Zahl ist grösser 30"
End If

Übung 1