date formulaire

[MASSJIPE]

Bonjour

J'ai un userform nommé DEQ , textbox2 pour la date mais celleci ne s'affiche pas dans userform sauf quant je valide

Private Sub CommandButton1_Click()
DEQ.TextBox2.Value = Format(Now, "dd/mm/yyyy")
With Sheets("DEQ")
If Not IsDate(TextBox2) Then
Exit Sub
End If
.Range("B4") = CDate(TextBox2)
End With
End Sub

Je sais pas ou est le probleme

merci

Cijoint.fr - Service gratuit de dépôt de fichiers

 

[Papou-net]

Re : date formulaire

Bonjou MASSJIPE,

C'est normal, tu affectes la date à ton textbox avec le clic du bouton OK.
Essaies d'écrire ta ligne

DEQ.TextBox2.Value = Format(Now, "dd/mm/yyyy")

dans l'événement Activate de ton userform
Espérant avoir répondu.

Cordialement.

 

[MASSJIPE]

Re : date formulaire

Bonjour papou-net
ok mais comment

 

[Papou-net]

Re : date formulaire

Re-bonjour MASSJIPE,

Voici un fichier exemple.

Cordialement.