Une vingtaine de chronos...

[ordep]

Bonjour,
Je souhaiterais savoir s'il est possible d'avoir une vingtaine de chronos indépendants sur un fichier.
En fait, j'aimerais pouvoir prendre les temps (avec départs décalés) de 20 groupes pour des séances de course d'orientation.
Peut être est-il possible de le faire qu'a partir d'un seul chrono mais ca me parait bien compliqué.
La plupart des posts sur le sujet traite de chrono unique, donc si vous avez des billes je suis preneur...

Merci

 

[MJ13]

Re : Une vingtaine de chronos...

Bonjour Ordep,

J'ai déjà vu cela sur XLD, il me semble avec des chevaux 😕.

Fais une petite recherche sur le forum puis reviens si tu ne trouves rien.

 

[job75]

Re : Une vingtaine de chronos...

Bonjour,

J'avoue avoir du mal à comprendre, voyez cette macro :

Sub Chronos()
Dim t1, t2, t3, t4, chrono1, chrono2, chrono3
t1 = Timer
Application.Wait (Now + TimeValue("0:0:5"))
t2 = Timer
Application.Wait (Now + TimeValue("0:0:10"))
t3 = Timer
Application.Wait (Now + TimeValue("0:0:15"))
t4 = Timer
'-----
chrono1 = t2 - t1
chrono2 = t3 - t2
chrono3 = t4 - t3
'-----
MsgBox chrono1
MsgBox chrono2
MsgBox chrono3
'-----
End Sub

A+

 

[phlaurent55]

Re : Une vingtaine de chronos...

Bonjour à tous,

voir fichier joint pour 20 chronos sur la même feuille
à adapter en fonction des besoins

à+
Philippe

 

[ordep]

Re : Une vingtaine de chronos...

Merci pour tout.
Le fichier des chevaux est top !