Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Cancel Bedingun für Inputbox

Forumthread: Cancel Bedingun für Inputbox

Cancel Bedingun für Inputbox
29.09.2004 09:24:21
M4kus
Hallo, ich habe einen eigentlich ganz einfachen euro umrechner:

Sub Euro()
Dim eingabe, ergebnis
start:
eingabe = InputBox("Bitte Betrag in DM eingeben!")
If eingabe = "" Then
MsgBox ("Sie müssen zuerst einen Betrag eingeben")
GoTo start
End If
If eingabe = 0 Then
MsgBox ("Sie müssen eine Zahl eingeben nicht 0!")
GoTo start
End If
so, nun macht er wenn man auf abbrechen klickt bei der inputbox das gleiche wie wenn man auf ok gedrückt hätte ohne vorherige eingabe, wie kann ich dies abfangen, also bei click auf abbrechen das makro beenden
Vielen dank für eure Hilfe.
Gruß _Markus
ergebnis = eingabe / 1.95583
MsgBox ("Betrag in Euro: " & ergebnis)
End Sub

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Cancel Bedingun für Inputbox
29.09.2004 09:25:09
Markus
sorry,
die zwei zeilen unten gehören zum code dazu also unter das end if!!
AW: Cancel Bedingun für Inputbox
Ingo
Die InputBox gibt beim Abbrechen-Button eine Nullzeichenfolge zurück, das ist genauso als wenn man bei leerer texteingabe auf o.K. geht. Du kannst aber in der darauf folgenden MsgBox OKCancel anwenden
mfG
Ingo Christiansen
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige