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
Sub test()
Dim monat As Integer
monat = InputBox("Welcher Monat?", "Frage", "8")
MsgBox CDate(monat & "/31/2004")
End Sub