inputtbox nicht schließen wenn keine eingabe
18.11.2007 19:28:00
Fred
Hallo zusammen
Ich hoffe mir kann jemand helfen,ich möchte gerne das die Inputbox die sich geöfnet hat, nur noch zu schließen geht, wenn in ihr eine eingabe erfolgt ist.
Weiss jemand wie das Geht.
Hier mal mein Code der Erweitert werden müsste
Dim zeile As Long
zeile = Cells(Cells.Rows.Count, 1).End(xlUp).Row - 1
Cells(zeile + 1, 18) = InputBox("Wie war noch gleich Dein Name?")
Cells(zeile + 1, 19) = Format(Now(), "DD.MM.YYYY")
vielen Dank im vorraus
Fred
