Variablenabfrage auf empty inputbox
Heinz
ich hab ein Makro mittels dem über Inputboxen mehrere Infos abgefragt werden welche anschliessend in ein Tabellenblatt eingetragen werden.
bei den ersten beiden abfragen werden Zahlen abgefragt. Die zugehörigen Variablen sind mit Integer bzw long deklariert.
Hier lässt sich über "if is empty (var) then exit sub" wunderbar abfragen und das funzt auch.
Bei den nächsten beiden wird eine Texteingabe benötigt und die Variable ist daher mit string deklariert.
Allerdings funzt hier die if is empty Abfrage nicht.
Der Ablauf des Makros wird bei nicht Eingabe nicht unterbrochen sondern läuft dann einfach mit einer "leeren Zelle" weiter zur nächsten Abfrage, die ebenfalls so abläuft.
Dim Var10 As String
betreff:
myError = 3
Var10 = InputBox("Welche Stelle ist beroffen? (Kurzes Wort) " + vbNewLine + vbNewLine + _
"Wenn nichts eingegeben wird muss der Vorgang wiederholt werden!", "Abfrage betroffener Bereich starten...", "")
If IsEmpty(Var10) Then GoTo betreff
GoTo was
Muss ich anders deklarieren oder muss die Eingabeabfrage anders gestaltet werden?
Danke schon mal und Gruß Heinz
Anzeige