[RESOLU] : Obligation de saisir date dans textbox

[MADAGASCAR]

Bonsoir EXCEL DOWNLOADS
Bonsoir a tous et a toutes
Svp si vous avez un peu du temps pour voir ce fichier ..
J'ai essaye avec un code dedans mais il me reste un petit truc j'ai pas reussi de l'ajouter dans ce code
je veux que si on ne tappe une date alors le textbox se vide apres ce message d'alerte..
Merci d'avance pour l'aide
Cordialement
MADA

 

[tototiti2008]

Re : Obligation de saisir date dans textbox

Bonsoir Mada,

un essai

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    If IsDate(TextBox1.Text) Then
        TextBox1.Text = Format(CDate(TextBox1.Text), "dd/mm/yyyy")
    Else
        TextBox1.Text = ""
        Cancel = True
        MsgBox "le format de date est incorrect.", vbOKOnly + vbCritical, "Attention...."
    End If
End Sub

 

[MADAGASCAR]

Re : Obligation de saisir date dans textbox

Bonsoir tototiti2008
Merci pour votre aide ..
Merci pour votre impeccable code
Merci pour votre gentillesse
C'est parfaitement resolu ..grace a vous "tototiti2008" ..encore merci
Cordialement
MADA