Laps de temps avant lancement macro.

[Hulk]

Hello tout le monde,

Zallez m'prendre pour un fou 😀 mais est-ce possible que par exemple dans la macro suivante

Private Sub CommandButton1()
MsgBox "Coucou"
End Sub

Qu'il lance le message 5 secondes après avoir cliqué ?

J'ai esayé comme ceci, mais non.

Private Sub CommandButton1()
Temps = Now + TimeValue("00:00:05")
MsgBox "Coucou"
End Sub

Merci bien, Hulk.

 

[JORDAN]

Re : Laps de temps avant lancement macro.

Bonsoir Hulk

Essaye ceci

Application.Wait (Now + TimeValue("00:00:05"))

 

[job75]

Re : Laps de temps avant lancement macro.

Bonsoir Hulk, Jordan,

Le seul inconvénient (si c'en est un) avec Wait c'est que le sablier tourne (la macro tourne, on ne peut rien faire).

Une solution classique avec OnTime :

Private Sub CommandButton1()
Application.OnTime Now + TimeValue("0:0:5"), "Message"
End Sub

Sub Message() 'à placer impérativement dans un module
MsgBox "bonsoir"
End Sub

A+

 

[youky(BJ)]

Re : Laps de temps avant lancement macro.

Bonjour Jordan, bonsoir Hulk,
Tiré de l'aide
Important La méthode Wait suspend toute activité de Microsoft Excel et peut vous empêcher d'accomplir toute autre opération sur votre ordinateur pendant la durée de la pause. Seules les tâches de fond telles que l'impression ou le recalcul se poursuivent.

Cela reste trés pratique dans certains cas.
Voici une facon de faire qui permet encore de travailler ici dans 5 secondes
mais il est possible de faire afficher le message à 17h....... ou autres........
Application.OnTime Now + TimeValue("00:00:05"), "MonMessage"

et dans un module

Sub MonMessage()
MsgBox "Salut"
End Sub

 

[Hulk]

Re : Laps de temps avant lancement macro.

Hello Jordan, Job, Youky,

Merci messieurs, impec !

Vrai que la soluce de Job est plus mieux bien 😀

Au plaisir de vous lire, Hulk.

PS. Merci Youki, c'est ce que disait Job 😉

 

[vbacrumble]

Re : Laps de temps avant lancement macro.

Bonsoir

Hulk:

PS. Merci Youki, c'est ce que disait Job

Ou vice-versa

Regardes l'heure de l'édition de job75 et l'heure du message de Youki 😉