Programme, die immer nur stur von oben nach unten durchlaufen, sind selten nützlich. Erst wenn Code auf unterschiedliche Situationen unterschiedlich reagieren kann, wird er wirklich brauchbar. Genau dafür sind Bedingungen da: Sie ermöglichen es, den Programmfluss abhängig von Werten und Zuständen in verschiedene Richtungen zu lenken. In VBA stehen dafür zwei Konstrukte zur Verfügung – das If…Then…Else<\/b>-Konstrukt für einfache bis mittlere Verzweigungen und Select Case<\/b> für Situationen, in denen man einen Wert gegen viele mögliche Ausprägungen prüfen möchte. In diesem Artikel zeigen wir, wie beide funktionieren, wann man welches einsetzt und worauf man dabei achten sollte.<\/p>\nWas ist eine Bedingung?<\/h2>\n
Eine Bedingung ist ein Ausdruck, der entweder wahr (True<\/b>) oder falsch (False<\/b>) ergibt. VBA wertet diesen Ausdruck aus und führt dann je nach Ergebnis unterschiedliche Codeabschnitte aus.<\/p>\n
Das klingt abstrakt, ist aber im Alltag sofort vertraut: „Wenn der Lagerbestand unter 10 fällt, dann eine Meldung ausgeben“ oder „Wenn das Feld Nachname leer ist, dann den Datensatz nicht speichern“ – das sind typische Bedingungen, wie sie in Access-Anwendungen ständig vorkommen.<\/p>\n
Bedingungen entstehen durch den Vergleich von Werten mit Vergleichsoperatoren. Die wichtigsten sind:<\/p>\n
Mehrere Bedingungen lassen sich mit den logischen Operatoren And<\/b>, Or<\/b> und Not<\/b> verknüpfen, auf die wir weiter unten noch eingehen.<\/p>\nIf…Then – die einfachste Form<\/h2>\n
Die einfachste Form einer Bedingung führt einen Codeblock nur dann aus, wenn eine Bedingung wahr ist – und tut sonst nichts. Die Schreibweise sieht so aus:<\/p>\n
If <\/span>lngBestand < 10 Then<\/span>\r\n MsgBox<\/span> \"Lagerbestand kritisch!\"\r\nEnd If<\/span><\/pre>\nVBA prüft, ob lngBestand<\/b> kleiner als 10<\/b> ist. Ist das der Fall, wird die Meldung angezeigt. Ist es nicht der Fall, springt VBA direkt hinter das End If<\/b> und macht weiter.<\/p>\n
Für sehr kurze Fälle gibt es auch eine einzeilige Schreibweise, die ohne End If<\/b> auskommt:<\/p>\nIf <\/span>lngBestand < 10 Then<\/span> MsgBox<\/span> \"Lagerbestand kritisch!\"<\/pre>\nDiese Schreibweise ist kompakt, aber man sollte sie nur bei wirklich trivialen Fällen verwenden. <\/p>\n
Sobald der Code im Then<\/b>-Zweig auch nur ein wenig komplexer wird, ist die mehrzeilige Form mit End If<\/b> deutlich leichter zu lesen und zu warten.<\/p>\nIf…Then…Else – zwei Wege<\/h2>\n
Häufig möchte man nicht nur reagieren, wenn eine Bedingung zutrifft, sondern auch einen alternativen Weg einschlagen, wenn sie nicht zutrifft. Dafür gibt es den Else<\/b>-Zweig:<\/p>\nIf <\/span>lngBestand < 10 Then<\/span>\r\n MsgBox<\/span> \"Lagerbestand kritisch!\"\r\nElse<\/span>\r\n MsgBox<\/span> \"Lagerbestand in Ordnung.\"\r\nEnd If<\/span><\/pre>\nIst lngBestand<\/b> kleiner als 10<\/b>, erscheint die Warnung. In allen anderen Fällen – also wenn der Bestand 10<\/b> oder mehr beträgt – erscheint die Entwarnung. Einer der beiden Zweige wird immer ausgeführt.<\/p>\nIf…Then…ElseIf – mehrere Bedingungen hintereinander<\/h2>\n
Wenn es mehr als zwei Möglichkeiten gibt, kommt ElseIf<\/b> ins Spiel. Damit lassen sich beliebig viele Bedingungen nacheinander prüfen:<\/p>\nIf <\/span>lngBestand = 0 Then<\/span>\r\n MsgBox<\/span> \"Ausverkauft!\"\r\nElse<\/span>If lngBestand < 10 Then\r\n MsgBox<\/span> \"Lagerbestand kritisch!\"\r\nElse<\/span>If lngBestand < 50 Then\r\n MsgBox<\/span> \"Lagerbestand niedrig.\"\r\nElse<\/span>\r\n MsgBox<\/span> \"Lagerbestand in Ordnung.\"\r\nEnd If<\/span><\/pre>\nVBA prüft die Bedingungen von oben nach unten und führt den ersten Zweig aus, dessen Bedingung zutrifft. Die übrigen Zweige werden dann nicht mehr geprüft. Das ist ein wichtiger Punkt: Hätte man die Reihenfolge vertauscht und lngBestand < 50<\/b> zuerst geprüft, würde dieser Zweig auch für einen Bestand von 0<\/b> oder 5<\/b> greifen – die spezifischeren Fälle kämen nie dran. Die Reihenfolge der Bedingungen ist also entscheidend: immer vom Speziellsten zum Allgemeinsten.<\/p>\nBedingungen verknüpfen mit And, Or und Not<\/h2>\n
Oft muss man nicht eine einzelne Bedingung prüfen, sondern mehrere gleichzeitig. Dafür stehen die logischen Operatoren And<\/b>, Or<\/b> und Not<\/b> zur Verfügung.<\/p>\nMöchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>
\nHier geht es zur Bestellung des Jahresabonnements des Magazins Access [basics]<\/strong>:<\/span>
\nZur Bestellung ...<\/a><\/span>
\nDanach greifen Sie sofort auf alle rund 400 Artikel<\/strong> unseres Angebots zu - auch auf diesen hier!<\/span>
\nOder haben Sie bereits Zugangsdaten? Dann loggen Sie sich gleich hier ein:<\/span><\/p>\n<\/div>\n\n\t\n\t