30.09.2013 Aufrufe

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

Hurra! Ihre Datei wurde hochgeladen und ist bereit für die Veröffentlichung.

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!