Thema Datum  Von Nutzer Rating
Antwort
09.02.2020 18:15:00 Gast28422
NotSolved
09.02.2020 18:32:28 Mase
NotSolved
09.02.2020 18:34:52 Gast28422
NotSolved
09.02.2020 18:52:17 Mase
NotSolved
09.02.2020 18:59:29 Gast28422
NotSolved
09.02.2020 19:19:38 Mase
NotSolved
09.02.2020 19:34:10 Gast28422
NotSolved
09.02.2020 19:52:50 Mase
NotSolved
09.02.2020 20:32:13 Gast28422
NotSolved
09.02.2020 21:12:58 Mase
NotSolved
09.02.2020 21:31:10 Gast3333
NotSolved
Blau Format überprüfen
 09.02.2020 21:43:11 xlKing
Solved
09.02.2020 21:58:33 Gast28422
NotSolved

Ansicht des Beitrags:
Von:
xlKing		 Datum:
09.02.2020 21:43:11		 Views:
851		 Rating:
     
Antwort:
 Nein
Thema:
Format überprüfen

Dachte ich auch, aber deswegen hat Mase ja den On Error eingebaut. Bei mir jedenfalls funktioniert  Mases Code. Dennoch hier mal eine kleine Alternative. 

Sub FormatPruefen()

Dim Anfang As Date
Dim Rückgabe As String

Do
Rückgabe = InputBox("Bitte das Anfangsdatum der Veranstaltung eingeben")
If Rückgabe = "" Then Exit Sub
If Not IsDate(Rückgabe) Then MsgBox "Das Datum wurde falsch eingegeben. Bitte wiederholen."
Loop Until IsDate(Rückgabe)

Anfang = CDate(Rückgabe)

End Sub

Auch ich benutze Loop Until Isdate denn die Schleife ist durchaus gewollt bis ein Datum eingegeben wurde

Gruß Mr. K.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
09.02.2020 18:15:00 Gast28422
NotSolved
09.02.2020 18:32:28 Mase
NotSolved
09.02.2020 18:34:52 Gast28422
NotSolved
09.02.2020 18:52:17 Mase
NotSolved
09.02.2020 18:59:29 Gast28422
NotSolved
09.02.2020 19:19:38 Mase
NotSolved
09.02.2020 19:34:10 Gast28422
NotSolved
09.02.2020 19:52:50 Mase
NotSolved
09.02.2020 20:32:13 Gast28422
NotSolved
09.02.2020 21:12:58 Mase
NotSolved
09.02.2020 21:31:10 Gast3333
NotSolved
Blau Format überprüfen
 09.02.2020 21:43:11 xlKing
Solved
09.02.2020 21:58:33 Gast28422
NotSolved