Application.Ontime Now

[Cruz]

Hey!

Je vous joint un fichier, et j'aimerai savoir pourquoi ma macro du type Application.Ontime Now ... ne marche pas .
J'aimerai qu'en appouyant sur le bouton de la userform, l'image1 devienne rouge pendant 1 seconde, puis redevienne jaune.

Merci d'avance
a+

 

[Staple1600]

Re : Application.Ontime Now

Bonjour

Fichier invisible

 

[Cruz]

Re : Application.Ontime Now

est-ce que ca va marcher maintenant ?

 

[Staple1600]

Re : Application.Ontime Now

Oui ca marche comme ca

la procédure doit etre dans un module
pas dans le code de l'userform

Private Sub IM()
UserForm1.Image1.BackColor = &HFFFF&
End Sub

 

[Cruz]

Re : Application.Ontime Now

Hey!
merci beaucoup je n'est pas encore tester mais ca doit surement etre ca! Je ne savais pas que placer un code dans un module était différent.

Merci