Discussions et questions sur tout ce qui concerne la programmation tous langages et tous modules confondus.
Modérateur :Vilains modOOs
Règles du forum Balisage obligatoire dans cette section !
Aidez-nous à vous aider au mieux en balisant correctement votre question : reportez-vous sur les règles de cette section avant de poster !
Bonjour à tous,
Malgré mes recherches je n'ai pas trouvé de réponse.
Je ne suis absolument pas habitué au traitement des dates et heures, et mon cerveau de gaucher contrarié a du mal à comprendre certaines choses
Je voudrais tout simplement compter le temps que met une macro pour exécuter une certaine tâche.
Ci dessous un exemple
Sub Traitement()
Dim debut, fin as Date
debut = Time(now)
'Ici le wait simule un code qui "travaille
Wait 5000
fin = Time(now)
MsgBox "Ce traitement a nécéssité : _____ secondes."
End Sub
Merci d'avance
Dernière modification par Mobydick_62 le 03 mars 2014 15:22, modifié 1 fois.
Sub Traitement()
Dim top As Long
top = GetSystemTicks
Wait 5000
Print "Ce traitement a nécessité "+(GetSystemTicks-top)+" millisecondes (à 16 ms près)."
End Sub