Boucle VBA avec un pas inférieur à la seconde

Salut,

J'essaie de créer une boucle vba qui s'exécute toute les 0,1 seconde. Normalement, j'aurais utilisé, pour définir le pas:

tempsAttente = Now + TimeValue("00:00:00.1")

Do While Now < tempsAttente
DoEvents
Loop

Mon problème est que TimeValue ne gère pas les décimales de seconde et je ne trouve pas d'autre solution.

Est-ce qu'il y a une autre fonction ou astuce pour permettre d'avoir un pas réduit ?

Merci d'avance pour vos répons.

Bonjour,

Essaye ce morceau de code cela devrait fonctionner mais je sais pas pour une pause aussi petite que 0,1 secondes.

Dim finPause As Single
finPause = Timer() + 0.1 ' étant ta pause de 0,1s
Do While Timer < finPause
Loop

++

salut à toi ptitpanda,

merci pour t'as réponse, elle fonctionne parfaitement