Anzeige
Archiv - Navigation
992to996
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
992to996
992to996
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Prüfschleife

Prüfschleife
22.07.2008 10:07:00
Christian
Hallo Leute,
habe folgende Prüfschleife inzeniert:
...
If ComboBox1.Value "Depotunterlagen unvollständig" Or ComboBox1.Value "Nennwert falsch" Then
MsgBox ("Bitte benutzen Sie ausschließlich " + Chr(13) + "die vorgegebenen Stornogründe ! ! !"): ComboBox1.SetFocus
Exit Sub
Else: GoTo Eintragen
End If
Exit Sub
Resume Next
Eintragen:
...
leider geht excell danach nicht zum Eintragen über, sondern gibt immer wieder das Meldefenster aus.
kann jemand helfen ?
Gruß Christian

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Prüfschleife
22.07.2008 10:14:31
ransi
HAllo
Deine Oder Prüfung gibt immer wahr.
Versuch die Prüfung mal so:
Select case ComboBox1.Value
case "Depotunterlagen unvollständig"
case "Nennwert falsch"
case else:
MsgBox ("Bitte benutzen Sie ausschließlich " + Chr(13) + "die vorgegebenen Stornogründe ! ! !")
ComboBox1.SetFocus
exit sub
end select

ransi

AW: Prüfschleife
22.07.2008 10:31:14
Christian
Das klappt großartig !!!
Danke ransi
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige