format Timer - Start limité à 2 décimales

Skyna

XLDnaute Occasionnel
Bonjour à tous,

Dans une macro j'ai inséré le code suivant pour calculer la durée d'une action :

Dim start As Single
start = Timer
ActiveSheet.Calculate
MsgBox "La mise à jour a duré : " & Timer - start & " secondes. Merci d'avoir patienté.", vbOKOnly + vbInformation, "Information"
End Sub

Mais lorsque la message box s'affiche j'ai par exemple 9.12458 secondes

Je n'arrive pas à limiter le résultat à 2 décimales...

Merci pour votre aide
 

Discussions similaires

Réponses
1
Affichages
790

Statistiques des forums

Discussions
312 500
Messages
2 089 005
Membres
104 003
dernier inscrit
adyady__