Passer directement au contenu principal

Timer, fonction

Renvoie une donnée de type Chaîne représentant le nombre de secondes écoulées depuis minuit.

Syntaxe

Timer

Notes

Dans Microsoft Windows, la fonction Timer renvoie des portions fractionnaires d’une seconde. Sur Macintosh, la résolution du minuteur est d’une seconde.

Exemple de requête

Expression

Résultats

Sélectionnez Timer () comme SecondsPast à partir de ProductSales GROUPEr par Timer ();

Renvoie le nombre de secondes écoulées depuis minuit en fonction de l’heure système et qui s’affiche dans la colonne SecondsPast.

Exemple VBA

Remarque : Les exemples suivants illustrent l’utilisation de cette fonction dans un module Visual Basic pour applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence du développeur dans la liste déroulante en regard de Rechercher , puis entrez une ou plusieurs conditions dans la zone de recherche.

Cet exemple utilise la fonction Timer pour suspendre l’application. L’exemple utilise également DoEvents pour transmettre d’autres processus au cours de la pause.

Dim PauseTime, Start, Finish, TotalTime
If (MsgBox("Press Yes to pause for 5 seconds", _
4)) = vbYes Then
PauseTime = 5 ' Set duration.
Start = Timer ' Set start time.
Do While Timer < Start + PauseTime
DoEvents ' Yield to other processes.
Loop
Finish = Timer ' Set end time.
TotalTime = Finish - Start ' Calculate total time.
MsgBox "Paused for " & TotalTime & " seconds"
Else
End
End If

Remarque :  Cette page a été traduite automatiquement et peut donc contenir des erreurs grammaticales ou des imprécisions. Notre objectif est de faire en sorte que ce contenu vous soit utile. Pouvez vous nous dire si les informations vous ont été utiles ? Voici l’article en anglais pour référence.

Voir aussi

Choisir la fonction de date correcte

Développez vos compétences dans Office
Découvrez des formations
Accédez aux nouvelles fonctionnalités en avant-première
Rejoignez le programme Office Insider

Ces informations vous ont-elles été utiles ?

Nous vous remercions pour vos commentaires.

Merci pour vos commentaires. Il serait vraisemblablement utile pour vous de contacter l’un de nos agents du support Office.

×