Partager via


Méthode Application.Wait (Excel)

Interrompt une macro en cours d’exécution jusqu'à une heure spécifiée. Renvoie True si l'heure spécifiée est atteinte.

Syntaxe

expression.Attendre (durée)

expressionUne variable qui représente un objetApplication.

Paramètres

Nom Requis/Facultatif Type de données Description
Time Obligatoire Variant Heure à laquelle vous voulez que la macro reprenne, au format de date Microsoft Excel.

Valeur renvoyée

Boolean

Remarques

La méthode Attendre suspend toute activité de Microsoft Excel et peut vous empêcher d'effectuer d'autres opérations sur votre ordinateur aussi longtemps que queAttendre reste effective. Toutefois, l’arrière-plan traite afin que l’impression et le recalcul continuent.

Exemple

Cet exemple suspend l'exécution d'une macro jusqu'à 18:23 aujourd'hui.

Application.Wait "18:23:00"

Cet exemple suspend l'exécution d'une macro pendant environ 10 secondes.

newHour = Hour(Now()) 
newMinute = Minute(Now()) 
newSecond = Second(Now()) + 10 
waitTime = TimeSerial(newHour, newMinute, newSecond) 
Application.Wait waitTime

Cet exemple affiche un message indiquant si 10 secondes se sont écoulées.

If Application.Wait(Now + TimeValue("0:00:10")) Then 
 MsgBox "Time expired" 
End If

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.