VBA – Programmierung mit Excel Grundlagen
Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.
YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.
Seite 40<br />
If Betrag > Wert And Eingang Then<br />
Meldung = "überzahlt"<br />
ElseIf Betrag = Wert And Eingang Then<br />
Meldung = "ausgeglichent"<br />
Else<br />
Meldung = "mahnen !"<br />
End If<br />
End Sub<br />
Das Sprachkonzept von <strong>VBA</strong><br />
5.4.1.2 Die Iif <strong>–</strong> Anweisung<br />
Als Alternative zur einfachen If <strong>–</strong> Anweisung, insbesondere, wenn diese für bedingte<br />
Zuweisungen von Werten an Variablen benutzt werden soll, kann die IIF <strong>–</strong> Funktion<br />
dienen. Die Syntax dieser Funktion:<br />
Iif(Bedingung, Ausdruck1, Ausdruck2)<br />
zeigt die Verwandtschaft <strong>mit</strong> der WENN <strong>–</strong> Funktion von <strong>Excel</strong>. Ähnlich funktioniert auch<br />
diese Funktion <strong>–</strong> AUSDRUCK1 wird zurückgegeben, wenn die Bedingung den<br />
Wahrheitswert TRUE liefert, AUSDRUCK2, wenn der Wahrheitswert FALSE ist.<br />
Die Ausdrücke 1 und 2 können Konstanten, Variablen, Funktionen oder Kombinationen<br />
dieser Elemente sein, Anweisungen kann IIF jedoch nicht ausführen.<br />
Statt<br />
If Wert > 0 Then<br />
Aus = "bezahlt"<br />
Else<br />
Aus = "offen"<br />
End If<br />
kann <strong>mit</strong>tels IIF verkürzt werden zu:.<br />
Aus = IIf(Wert > 0, "bezahlt", "offen")<br />
5.4.1.3 Die Select Case - Anweisung<br />
Eine Alternative zur Blockform der If - Anweisung bildet die SELECT CASE -Anweisung. Ihr<br />
Vorteil gegenüber der IF - Anweisung liegt darin, daß sie in einfacherer und<br />
übersichtlicherer Form die Definition von Anweisungsgruppen erlaubt. Intern wird sie vom<br />
System in einen effizienteren Code umgesetzt und beschleunigt dadurch die<br />
Programmausführung.<br />
Ihre Syntax lautet:<br />
Select Case Testausdruck<br />
[Case Werteliste1<br />
..[Anweisungen1]]<br />
[Case Werteliste2<br />
..[Anweisungen2]]...<br />
.<br />
[Case Else<br />
..[Anweisungen n]]<br />
End Select<br />
TESTAUSDRUCK ist die auszuwertende ist ein Ausdruck, der einen numerischen Wert oder<br />
eine Zeichenkette liefert.<br />
WERTELISTEN können aus einzelnen Werten bestehen, oder aus Ausdrücken der Form:<br />
Ausdruck1, Ausdruck2<br />
[...,Ausdruck n]<br />
Liste von Werten, durch Kommata<br />
getrennt<br />
Ausdruck1 To Ausdruck n Werte <strong>mit</strong> Unter- und Obergrenze<br />
Is Vergleichsoperator Ausdruck Wertebereich