XL 2010 Affichage Timer juste min - sec

herve62

XLDnaute Barbatruc
Bonjour
J'ai un timer dans ma macro , mais qui affiche "00:00:00" et j'aimerai juste afficher le temps final comme msgbox "dsfdsfdfq en "x MINUTES "et" Y Secondes
merci
 

job75

XLDnaute Barbatruc
Bon le mm ça n'allait pas, ceci est bon :
Code:
Dim t#
t = Now
'---
MsgBox "Exécution en " & Mid(Format(Now - t, "hh:mm:ss"), 4)
ou ceci :
VB:
Dim t#
t = Now
'---
t = Now - t
MsgBox "Exécution en " & Minute(t) & " minute(s) et " & Second(t) & " seconde(s)"
 

job75

XLDnaute Barbatruc
Juste pour expliquer pourquoi ma proposition du post #2 ne va pas.

Quant la durée est de 5 secondes la MsgBox affiche 12:05.

C'est dû au fait que VBA considère que "mm" doit être un mois et non pas des minutes.

On vérifiera qu'en VBA Month("00:05") renvoie 12 (mois de décembre).

Alors que sur Excel MOIS("00:05") renvoie 1 (mois de janvier)..
 

herve62

XLDnaute Barbatruc
JOB : Tu es vraiment un grand fouineur perfectionniste pire que moi , comme là ou je demande plus de détail dans mon affichage mais je ne savais pas faire et là l'affichage est plus présentable à mon goût !!
Bon Week end !

PS : j'aime bien tes explications quand je comprends .... comme ici !
 

Discussions similaires

Statistiques des forums

Discussions
299 878
Messages
1 979 751
Membres
206 857
dernier inscrit
Pageee