habe im Netz leider nichts zum korrekten Synthax gefunden bzw. ob eine solche Verknüpfung überhaupt möglich ist.
Also CaseIs >= .... AND Vielleicht kann mir jemand weiterhelfen.
Vielen Dank schon mal.
VG Anton
IF Bedingung1 Then
Teilcode1
ElseIf Bedingung2 Then
TeilCode2
ElseIf Bedingung3 Then
TeilCode3
Else
TeilCode4
End If
Gruß DanielUm den Case Is
mit mehreren Bedingungen in VBA korrekt zu implementieren, folge diesen Schritten:
Öffne den VBA-Editor in Excel (Alt + F11).
Erstelle ein neues Modul (Rechtsklick auf "VBAProject", dann "Einfügen" > "Modul").
Schreibe den Code unter Verwendung von Select Case True
, um mehrere Bedingungen zu kombinieren:
Sub Beispiel()
Dim zahl As Integer
zahl = 15
Select Case True
Case zahl >= 5 And zahl <= 15
MsgBox "Zahl liegt im Bereich"
Case Else
MsgBox "Zahl außerhalb des Bereichs"
End Select
End Sub
Führe das Makro aus, um die Ergebnisse zu überprüfen.
ElseIf
: Stelle sicher, dass du ElseIf
korrekt schreibst, ohne Leerzeichen.Select Case
: Der Select Case
ist nicht ideal für komplexe Verknüpfungen mit And
. Verwende stattdessen If...Then...ElseIf
.>=
, <=
, And
, Or
usw.Wenn du mehrere Bedingungen überprüfen möchtest, kannst du auch die If...Then...ElseIf
-Struktur verwenden:
Sub AlternativeBeispiel()
Dim zahl As Integer
zahl = 15
If zahl >= 5 Then
If zahl <= 15 Then
MsgBox "Zahl liegt im Bereich"
End If
Else
MsgBox "Zahl außerhalb des Bereichs"
End If
End Sub
Diese Methode erlaubt es dir, die Logik flexibler zu gestalten.
Hier sind zwei nützliche Beispiele für die Verwendung von Select Case
und If...Then...ElseIf
in VBA:
Beispiel mit Select Case
:
Sub CaseBeispiel()
Dim note As Integer
note = 2
Select Case note
Case 1
MsgBox "Sehr gut"
Case 2
MsgBox "Gut"
Case Else
MsgBox "Nicht bestanden"
End Select
End Sub
Beispiel mit If...Then...ElseIf
:
Sub NoteBeispiel()
Dim note As Integer
note = 2
If note = 1 Then
MsgBox "Sehr gut"
ElseIf note = 2 Then
MsgBox "Gut"
Else
MsgBox "Nicht bestanden"
End If
End Sub
Select Case True
, um komplexe Bedingungen zu überprüfen, die And
und Or
kombinieren.1. Wie kann ich mehrere Bedingungen in einem Select Case
kombinieren?
Du kannst Select Case True
verwenden und dann die Bedingungen innerhalb der Case
-Klauseln mit And
oder Or
kombinieren.
2. Gibt es in VBA eine Funktion ähnlich wie Else if
?
Ja, in VBA verwendest du ElseIf
, um mehrere Bedingungen abzufragen. Es ist wichtig, dass du das Wort korrekt schreibst, um Syntaxfehler zu vermeiden.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen