VBA lernen - Excel 2007/2010 (2)

Von: Dieter Frommhold
Stand: 16. Januar 2011
Anmelden um Kommentare zu schreiben

Einige Steueranweisungen

If-Then-Else-Anweisung

Diese Anweisung ist sehr wichtig für die logische Folge des Programms. Im folgenden Beispiel wird der Eingabetest für das Excelprogrammierbeispiel vorgestellt, der alle Zahlen <1 oder >20 ablehnt. Desgleichen werden auch alle Texteingaben abgewiesen.

'Diese Variablen zu Beginn
'des Moduls werden benötigt
'Folgended Variablendefinition
'lässt auch Texteingabe zu
Dim Eingabewert As Variant 
Dim Ganz As Integer
Dim I As Byte

Sub einmaleins()
Eingabewert = _
InputBox("Eine ganze Zahl zw. 1 und 20", _
"Eingabe")
If Eingabewert < 1 Or Eingabewert > 20 Then
MsgBox "eingegebene Zahl " & _
Eingabewert & " ist falsch!"
Exit Sub
End If

Obiger Ausschnitt der Prozedur einmaleins zeigt die Prüfung des Eingabewertes, die nur Zahlen von 1 bis 20 zulässt. Gebrochene Zahlen werden aufgrund der Zuweisung zu einer Integer-Variablen gerundet.

Diese Seite ist für Mitglieder von akademie.de reserviert.

Möchten Sie die Mitgliedschaft 14 Tage kostenlos testen und den Beitrag komplett lesen?

Oder möchten Sie zunächst mehr über diesen Beitrag erfahren und die Leseproben sehen?

Ich bin bereits Mitglied
Jetzt Probemitglied werden
Ich kann in den 14 Tagen Probezeit formlos z.B. per E-Mail stornieren. Wenn ich das nicht tue, entscheide ich mich für ein