Inputbox darf nicht leer sein
26.07.2013 14:57:09
Thomas
in einem kommt eine Inputbox vor. Wenn die Inputbox leer ist, soll die sub bendet werden.
Der ursprüngliche Code war so:
Col = InputBox("Eingabe", "A")
If StrPtr(Col) = 0 Or IsNumeric(Col) Then Exit Sub
Col = InputBox("Eingabe", "A")
If StrPtr(Col) = 0 Or IsNumeric(Col) Or StrPtr(Col) = "" Then Exit Sub
Gruß
Thomas
Anzeige