inputbox for date

[anjing13]

I wanna use inputbox to input the date and use it in the "ddmm" format, how to do it? my code is like this...but it doesn't work...
dim mydate as date
mydate=inputbox("enter the date")
mydate = format(mydate,"ddmm")

 

[venkat1926]

why not try something like this

Sub test()
Dim mydate
mydate = InputBox("type the date e.g. 4/12/11")
Range("A1") = mydate
Range("A1").NumberFormat = "ddmm"
End Sub