Comment mettre en pause l’exécution VBA pendant un nombre spécifique de secondes ?
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.