VERIFICA SE A DATA INFORMADA É VALIDA

CÓDIGO VERIFICADOR DE DATAS VÁLIDAS

Hoje postarei um código que uso nos textbox destinados a data, para evitar possíveis erros  ao desenvolver pequenos projetos em VBA, que tem por sua vez a função de verificar se a data informada é válida ou não... 

______________________________________________________

Para esse exemplo vou criar um UserForm, 1 Label, 1 TextBox e um Botão de comando...

______________________________________________________

O código exemplo é esse basta trocar pelo seu textbox


If IsDate(Me.TextBox1.Text) = False Then
MsgBox "DATA INVÁLIDA", vbCritical, "AVISO"
Else
End If



Vlw...  até a próxima...