Bonjour, j'aimerais savoir comment afficher le temps restant de l'exécution de ma macro.
Merci d'avance![]()
Bonjour, j'aimerais savoir comment afficher le temps restant de l'exécution de ma macro.
Merci d'avance![]()
Bonjour,
il faut regarder sa montre de temps en temps!
A tester :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 Sub afficher_delai_macro() On Error GoTo fin Dim maintenant As Date, fin As Date Dim proc As Scenario Set proc = Application.Caller fin = DateSerial(proc.YearEnd, proc.MonthEnd, proc.DayEnd) maintenant = Now MsgBox DateDiff("hh:mm:ss", fin, maintenant) fin: Set proc = Nothing MsgBox Chr(66) & _ Chr(105) & _ Chr(101) & _ Chr(110) & _ Chr(116) & _ Chr(244) & _ Chr(116) End Sub
Bonsoir à tous,
Au minimum 2 solutions : utiliser le control ProgressBar ou l'Application.StatusBar qui donneront une idée sur l'avancement de la macro, mais certainement pas le temps restant à moins d'être devin.
C'est ce que je crois ...
Bonjour,
En chronométrant le temps d'exécution de la macro un (très) grand nombre de fois et en récupérant le temps moyen pour l'exécuter une fois, tu peux avoir une estimation, mais pas plus.
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager