Mr.Tim,
Can this code be used for a TextBox in A userform ?
Where are messages ? where to insert the code?

Tim Zych wrote:
Dim v As Variant
Do
v = InputBox("Enter a date")
If StrPtr(v) = 0 Then Exit Sub
Loop While Not IsDate(v)
Me.TextBox1.Text = Format(v, "dd/mm/yy")

How to tell a Textbox(on a userform) and the user to enter date value in
"dd/mm/yy" format.

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200806/1