Fonction Sleep

[typiquement]

Bonjour,

Je désirerais supendre l'exécution de mon programme(VB excel).
Par exemple avec un sleep qui ne compile pas pr l'instant.

Comment l'utilise t on?

Merci

 

[mutzik]

Re : Fonction Sleep

Bonjour,

Est-tu sur qu'il existe en VBA, pour ma part, il ne le connait pas dans mon Help, je pense qu'il n'existe qu'en VB mais pas en VBA

en VBA tu peux utiliser wait ...

 

[typiquement]

Re : Fonction Sleep

Wait ne compile pas non plus 🙁
Ca marche comment?

 

[MichelXld]

Re : Fonction Sleep

bonjour

Quelques exemples ci joint

Option Explicit
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
 
Sub LaMacro_V01()
    'tempo 1 seconde
    Sleep 1000 'pause en millisecondes
    'la suite de la macro
    MsgBox "test"
End Sub

Sub LaMacro_V02()
    Dim t As Date
    'Tempo 1 seconde
    t = Timer + 1: Do Until Timer > t: DoEvents: Loop
    MsgBox "test"
End Sub

Sub LaMacro_V03()
    'tempo 1 seconde
    Application.Wait (Now + TimeValue("0:00:01"))
    
    MsgBox "test"
End Sub

Bonne journée
MichelXld

 

[typiquement]

Re : Fonction Sleep

Merci bcp pr to aide