Excel VBA UserForm TextBox - Check If Date Is Valid (on exit)

preview_player
Показать описание
Excel VBA UserForm TextBox - Learn how to check if date is valid (on exit)

The code used in this video:

Private Sub txtDate_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If txtDate = vbEmptyString Then Exit Sub

If IsDate(txtDate) Then
txtDate = Format(txtDate, "dd/mm/yyyy")
Else
MsgBox "Please enter a valid date", vbCritical
End If

End Sub
Рекомендации по теме
Комментарии
Автор

Excellent tutorial. It's exactly what I needed to solve a problem in a project.

Milosz_Ostrow
Автор

I found out using vbEmptyString have problem. When change to vbNullString the function can be use

UzairSukor