Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Chrono course de côte

mada16

XLDnaute Nouveau
Bonjour à tous,
je suis nouveau sur le forum et ne maîtrise que TRES PEU excel. Comme le titre l'indique, je cherche à créer un chronomètre sous excel pour des courses de côte. La particularité de ces courses est que le départ ne se situe pas au même endroit que l'arrivée, donc pour chronométrer ces épreuves "à pas cher" on utilise un chrono manu tout simple et des talkie. Le problème est que pour donner le top départ avec le bruit du kart, c'est pas évident.
J'ai donc pensé à un système avec deux fichiers excel que l'on comparerait après l'épreuve pour avoir les temps.
Pour faire simple, on fait défiler un chrono dans une case, que l'on synchronise entre départ et arrivée quand il n'y a pas de bruit. Un commissaire au départ et un à l'arrivée avec chacun son fichier excel qui comporte la liste des pilotes. Quand un kart passe le ligne de départ, le commissaire clique sur le N° du pilote et le temps (ou plutôt l'heure de passage) s'inscrit dans sa case, et quand il passe la ligne d'arrivée l'autre fait la même chose. On obtient ainsi deux temps (heure de passage) différents et on fera la soustraction après la fin de l'épreuve pour obtenir le temps de parcours réel.
J'ai cherché longtemps sur le net, j'ai trouvé pas mal de choses mais jamais ce que je cherchais exactement, et c'est pourquoi je fais appel aux spécialistes que vous êtes.
Le fichier qu se rapproche le plus est celui en PJ mais le chrono n'est qu'en secondes et on a besoin d'une précision au centième...J'ai donc joint un deuxième fichier (chrono au millième), mais j'ai vu que le sytème n'était pas le même, un utilise des macros, l'autre une userform...
Je précise que dans le premier fichier, je n'ai pas besoin de classement (pour l'instant...) et que je n'ai pas besoin non plus de plusieurs tours (on créra plusieurs classeurs pour plusieurs épreuves. En gros je n'ai besoin que d'une colonne (A par exemple) pour y inscrire les N° des pilotes, une deuxième pour leurs noms, et une troisième pour y voir les horaires s'inscrire quand on clique sur le N° en colonne A.
S'il peut y avoir deux autres colonnes, une pour y coller les temps que l'on aurait copié sur le fichier arrivée, et enfin la dernière qui effectuerait la soustraction automatique pour avoir le temps de parcours, ce serait parfait. J'ai fait une esquisse (3ème PJ) mais il manque l'essentiel...
Merci par avance de votre aide, en espérant ne pas avoir été trop long et suffisamment clair.

Mada16
 

Pièces jointes

  • chrono seconde classement.xlsm
    47.4 KB · Affichages: 63
  • chronometre_millieme_de_secondes.xls
    66.5 KB · Affichages: 56
  • chrono cc kart.xlsm
    20.7 KB · Affichages: 51

Lone-wolf

XLDnaute Barbatruc
Hello mada , lolote , le Forum

Nouvelle version en PJ

Clique sur le n° du courreur comme d'habitude, ensuite sélectionne la feuille d'arrivée; et une fois que le ga' est là clique sur le bouton d'arret puis, affiche la feuille récap.

ATTENTION! Une fois le chrono démarré, ne touche et ne fait toucher plus à rien mise à part les boutons.
 

Pièces jointes

  • fichier lonewolf-v6.xlsm
    42.7 KB · Affichages: 38

mada16

XLDnaute Nouveau
On s'approche, on s'approche !!!!!
Le fonctionnement général est bon, mais je n'ai toujours pas les centièmes....je les voie défiler dans la case bleue mais au clic, il n'apparaissent pas dans les cases départ ou arrivée...
et sur la page arrivée , le fait d'être obligé de cliquer sur fin de course est pas top, car si on séléctionne un N° au dessus de 30, la case est cachée...
 

Lone-wolf

XLDnaute Barbatruc
Mais de quel centième parle-tu, je ne comprend pas?! Toutes les colonnes sont au formats "hh:mm:ss.000". Montre en image ce que tu souhaite, par-ce que dans les autres fichiers c'est exactement la même chose.


EDIT: peut-être comme ceci alors?? voir fichier.
 

Pièces jointes

  • fichier lonewolf-v6-2.xlsm
    47.5 KB · Affichages: 47
Dernière édition:

mada16

XLDnaute Nouveau
Dans la case bleue, quand je clique sur un N°, il y a un chrono qui part et qui affiche le temps en format hh:mm:ss,000 et les trois 0 correspondent à des millièmes de secondes.
Mais dans la case correspondant au kart s'affiche l'heure de départ en format hh:mm:ss,000 et c'est toujours 000, ça n'est jamais autre chose, donc la précision n'est que la seconde.
Sur la feuille arrivée, même chose, quand je clique sur fin de course, dans la case correspondante au kart s'affiche l'heure en format hh:mm:ss,000 avec toujours des 0, alors que dans la case bleue il y a par exemple 20:07:27,770 comme dans le fichier joint.
Je voudrais qu'il y ait, aussi bien sur le départ que l'arrivéé, quelque chose à la place des trois 0 pour avoir une précision plus petite que la seconde.
Je ne demande pas forcément les millièmes, les centièmes suffiraient...

EDIT sur le dernier fichier , il n'y a pas de millièmes sur les feuilles départ et arrivée mais ils apparaissent dans la colonne temps parcours de la feuille arrivée...
 

Pièces jointes

  • lonewolf4.xlsm
    47.1 KB · Affichages: 37
Dernière édition:

mada16

XLDnaute Nouveau
Oui, mais les millièmes n'apparaissent que dans le temps de parcours....
Et comme les deux fichiers (départ et arrivée) ne seront pas sur le même ordi, je devrai faire un copier/coller, et dans ce cas, plus de millièmes...
 

Dranreb

XLDnaute Barbatruc
Bonsoir.
Je pense qu'il suffit de remplacer Now par [NOW()] partout.
Remarque: ce fut une surprise pour moi de découvrir en suivant ce fil que la fonction Excel NOW était plus précise que VBA.Now, mais je ne suis pas sûr qu'elle le soit au centième de seconde.

Remarque 2: Il serait possible en VBA de construire quelque chose de très précis utilisant Application.OnTime, VBA.Now et surtout QueryPerformanceCounter pour récupérer les centièmes écoulés depuis le dernier changement de valeur de VBA.Now
VB:
Private Declare Function QueryPerformanceFrequency Lib "Kernel32" (X As Currency) As Boolean
Private Declare Function QueryPerformanceCounter Lib "Kernel32" (X As Currency) As Boolean
 
Dernière édition:

Lone-wolf

XLDnaute Barbatruc
Mada
Put.... d'abord tu veux , après Je ne demande pas forcément les millièmes, les centièmes suffiraient..., maintenant tu les veux à nouveau

ça c'est le dernier fichier, après démerde-toi tous seul, MERDE pour finir. T'es même pas foutu de montrer de ce que tu veux comme résultat.
 

Pièces jointes

  • fichier lonewolf-v6-Fini pour moi.xlsm
    47.9 KB · Affichages: 45
Dernière édition:

Dranreb

XLDnaute Barbatruc
Non mais Lone-wolf, le fond du problème c'est que VBA.Now, que tu emploie encore à certains endroit pour écrire dans les cellules, ne rend pas les centièmes de secondes. [NOW()], si. Quant à savoir s'ils sont justes par rapport à l'instant où on l'évalue, c'est autre chose.
 

mada16

XLDnaute Nouveau
Oh la!!! du calme et reprends mes réponses depuis le début!!! J'ai toujours dit que la précision demandée était les centièmes et tous les fichiers communiqués avaient les millièmes, donc tant mieux...
Quand je dis dans mon avant dernier post que les centièmes suffiraient , c'est pour éventuellement faciliter le travail, c'est tout. Si le fait de mettre des millièmes est plus facile, alors va pour les millièmes!!!
Et quand je dis dans mon dernier post "plus de millièmes", c'est que j'ai fait un copier /coller du fichier départ vers arrivée (comme je le ferai le jour de la course) et que la soustraction me donnait un temps avec trois 000
Et enfin , je n'arrive pas à avoir accés à ton dernier fichier (#25) pièce non trouvée
 

Lone-wolf

XLDnaute Barbatruc
Bonsoir Dranreb

J'ai fait comme tu as proposé dans le dernier fichier, j'ai mis now entre crochets. Mais mon galliard, tu lui met un affichage et c'est pas ça, un deuxième, puis un troisième. D'abord c'est blanc, après c'est noir, ensuite de nouveu blanc....
 

Discussions similaires

  • Question
Microsoft 365 chrono
Réponses
6
Affichages
501
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…