veriti site des amis d'excel

EXCEL ANNEE 2017

L'heure est venue de vous presenter

Une excel et bonne annee 2017 !

De la part de toute l equipe de VeriTi

Bienvenue

sur le site des amis d'Excel

excel.veriti.net ou fr

Musee

Visitez le "Musee VeriTi" 24h/24 - 7j/7, des "pepites" vous y attendent

Voir la suite

Hommage

Thierry POURTIER alias 'Ti'
s'en est alle brutalement le samedi 13 novembre 2010...

Voir la suite

Historique

Juillet 2013 : A l'occasion du 10eme anniversaire de VeriTi, j'ai décide de réparer et de remettre en ligne le site, avec une nouvelle version plus structurée tout en gardant les mêmes fichiers Excel

Voir la suite

Membre

+ Enregistrement

mon message chrono plus explicite

Objet : mon message chrono plus explicite
par mimi1958pp sur 27/12/2017 18:47:33

voici le code de ma macro pour chrono :
Dim ok As Boolean
Sub Demarrechrono()
'Macro Dan pour stephane Guidon
ok = True
Range("A1") = TimeSerial(0, 1, 0)
Call decompte
End Sub

Sub decompte()
'Macro Dan pour stephane Guidon
If ok Then
If Range("a1") = 0 Then
ok = False
Range("A1") = TimeSerial(0, 0, 0): End
End If
Range("A1") = Range("A1") - TimeSerial(0, 0, 1)
Range("A1").NumberFormat = "mm:ss"
Application.OnTime Now + TimeValue("00:00:01"), "deCompte"
End If
End Sub

mon chrono se trouve sur feuille 2 etla macro dans un module.

quand je suis sur feuille 1 , grace a une macros , je lance le chrono de la feuille 2.
la feuille 2 s'ouvre mais le chrono defile a une tres grande vitesse ( ce qui n'est plus un chrono)
merci de votre collboration

.