Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema InputBox
Screenshot zu InputBox	InputBox-Seite mit Beispielarbeitsmappe aufrufen

Informationen und Beispiele zum Thema MsgBox
Screenshot zu MsgBox	MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Datum: #8/31/2004# --> 8 durch Variable ersetzten

• Datum: #8/31/2004# --> 8 durch Variable ersetzten von Peter vom 31.08.2004 16:09:46
• AW: Datum: #8/31/2004# --> 8 durch Variable ersetzten - von Roland Hochhäuser am 31.08.2004 16:49:07

Betrifft: Datum: #8/31/2004# --> 8 durch Variable ersetzten von: Peter
Geschrieben am: 31.08.2004 16:09:46

Hi
Will ein Datum als Suchkriterium eingeben, was so funkioniert.
#8/31/2004#

Nun möchte ich jedoch die Werte durch Variabeln (mDay anstelle von 8) definieren.

Weiss jemand wie das geht?
Gruss und Dank
Peter

Betrifft: AW: Datum: #8/31/2004# --> 8 durch Variable ersetzten von: Roland Hochhäuser
Geschrieben am: 31.08.2004 16:49:07

Hallo Peter,

mal als Ansatz:

Sub test()
Dim monat As Integer
monat = InputBox("Welcher Monat?", "Frage", "8")
MsgBox CDate(monat & "/31/2004")
End Sub

Gruß
Roland

Beiträge aus den Excel-Beispielen zum Thema "Datum: #8/31/2004# --> 8 durch Variable ersetzten"