Probleme macro

mimi1958

XLDnaute Junior
Tout d'abord bonjour car suis nouveau sur le forum
commencons par le debut :
j'ai un fichier exel avec 9 feuilles qui contiennent tous un chrono ( le meme sur chaque feuille )
la macro du chrono est dans module 1.
voici la syntaxe ;

Dim ok As Boolean
Sub Demarrechrono()

ok = True
Range("c10") = TimeSerial(0, 0, 10)
Call decompte
End Sub

Sub decompte()

If ok Then
If Range("c10") = 0 Then
ok = False
Range("c10") = TimeSerial(0, 0, 0): End
End If
Range("c10") = Range("c10") - TimeSerial(0, 0, 1)
Range("c10").NumberFormat = "mm:ss"
Application.OnTime Now + TimeValue("00:00:01"), "deCompte"
End If
End Sub

mon probleme est que quand je lancce le chrono sur la feuille 1 tout marche bien.le decompte fini, je passe sur la feuille 2 et je lance le chrno.
et la le probleme est que quand je lance chrono feuille 2 le chrono feuille 1 se lance aussi

ma queston est :
comment dissocier cette macro afin de l'appliquer a chaque feuille séparément ?
j'espere avoir ete assez clair dans mon explication
en attente 'dune reponse de votre part .
cordialement
fichier joint afin que vus voyez le probleme
 

Pièces jointes

  • tournoi howell 7 paires ok .xlsm
    85.1 KB · Affichages: 19
Dernière édition:

mimi1958

XLDnaute Junior
salut et bonjour
j'ai relu la charte et je pense avoir bien fait et je ne voiss pas ce ue j'ai fait qui ne vas pas .peut me le dire car j' ai été poli , pas injurieux et mon texte est des plus explicite ( bien sur c est mon langage de débutant vba )
alors je ne vois pas
peut tu m'aiguiller s'il te plait ? sans offenser personne

cordialement
 

Statistiques des forums

Discussions
312 216
Messages
2 086 351
Membres
103 195
dernier inscrit
martel.jg