XL 2010 Affichage Timer juste min - sec

herve62

XLDnaute Barbatruc
Supporter XLD
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)..
 

Discussions similaires

Réponses
10
Affichages
350