taxt box properties in user form

to restrict textbox entry to date use following code Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If TextBox1 = vbNullString Then Exit Sub If IsDate(TextBox1) Then TextBox1.Value = Format(TextBox1.Value, "MM / DD / YYYY") Else MsgBox "Please Enter Date " TextBox1 = vbNullString End If End Sub