Kontrol af dato-indtastning

Var det ikke en ide at bruge en DatePicker?

Noget i den retning du leder efter ?

Dim vDate As Variant

vDate = Text1.Text
If Not IsDate(vDate) Then
    MsgBox ("Du har ikke indtastet en korekt dato"),vbOkOnly
Else
    vDate = Format$(vDate, "yyyy-mm-dd")
    MsgBox ("Du har indtastet følgende dato :" & vDate),vbOkOnly
End If

>> tubber
Det var jo lige det :-) TAK
Smider du et svar ?

/Søren

Jammen det var så lidt :)