saisie auto dans userform

[CHB]

Bonjour à tous,

Dans excel, la combinaison des touches CTRL + ; (point virgule) permet d'ajouter la date courante dans la celule active à l'endroit ou se trouve le curseur.

Comment obtenir le mêm résultat lors de la saise dans un userform?.

Merci

Christian

 

[Myta]

Salut CHB

Regarde si ceci te va

Private Sub UserForm_Initialize()
TextBox1 = Left(Now, 8)
End Sub

Mytå

 

[CHB]

Bonjour,

J'ai essayé ton idée mais rien ne se passe.

J'ai tenté de placer la procédure dans les divers endroits du projet
- feuilles
- userform
- modules
- objet

sans succès.

Si tu as une idée je suis preneur . Merci d'avance.

Christian