ich hätte eine Frage zum unteren Programmiercode. Die Variable Eingabe habe ich den Datentyp "Date" zugewiesen. Leider funktioniert es nicht so wie ich es gerne hätte.
Für die Variable Eingabe soll eine Uhrzeit eingegeben werden z.B. 07:10. Es gibt ja noch die Einstellung "Default" in der Inputbox. Kann man da nicht der Variablen Eingabe das Format hh:mm zuweisen?
Do
Eingabe = Application.InputBox("Geben Sie Ihre Startzeit ein!", "Startzeit")
If Eingabe = False Then
MsgBox "Abbrechen", vbInformation
Exit Sub
ElseIf Eingabe = True Then
MsgBox "Eingabe getätigt!"
Exit Do
ElseIf Eingabe = "" Then
MsgBox "Kein Eingabe bzw. kein gültiges Datum!",
vbCritical, "Fehlermeldung"
End If
Loop Until Range("A" & i) ""
Range("A" & i) = Eingabe
Rows(i).Interior.Color = xlNone