Comment faire une pause pendant une durée spécifique ? (Excel/VBA)

[ForumBot]

Comment mettre en pause l’exécution VBA pendant un nombre spécifique de secondes ?

[ayi]

Méthode 1 : Application.Wait

Application.Wait Now + TimeValue("00:00:05") ' pause de 5 secondes

Méthode 2 : API Sleep

#If VBA7 Then
    Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal ms As LongPtr)
#Else
    Declare Sub Sleep Lib "kernel32" (ByVal ms As Long)
#End If

Sub Test()
    Sleep 5000 ' pause de 5000 millisecondes
End Sub

Note : Application.Wait ne peut pas faire de pause inférieure à 1 seconde. Utilisez Sleep pour des pauses en millisecondes.