Plusieurs chronomètres sur 1 USF ?

wilfried_42

XLDnaute Barbatruc

• 17 Février 2008

• #2

Re : Plusieurs chronomètres sur 1 USF ?

Bonjour ya_v_ka

Tu veux utiliser un chrono pour chaque table alors que seul le temps passé à une table t'interresse

Exemple (Si j'ai tout compris) :
Pour chacune de table un drapeau True ouverte, False Fermée
à L'ouverture, Depart = Now : L'heure d'douverture de la table

Tu geres ensuite une interruption On timer (toutes les une ou deux seconde)

sub chrono()
on timer now + "00:00:02", "chrono" ' toutes les deux secondes
if drapeau(1) = true then temps(1) = now-depart(1)
if drapeau(1) = true then temps(2) = now-depart(2)
if drapeau(1) = true then temps(3) = now-depart(3)
if drapeau(1) = true then temps(4) = now-depart(4)
end sub

M'enfin ce n'est qu'un exemple de ce que j'ai compris

 

Vote positif 0 Vote négatif

ya_v_ka

XLDnaute Impliqué

• 17 Février 2008

• #3

Re : Plusieurs chronomètres sur 1 USF ?

Hello

C'est une approche interessante... je vais essayer de mettre en route...

D'ores et déjà MERCI

Ya'v

 

Vote positif 0 Vote négatif

ya_v_ka

XLDnaute Impliqué

• 17 Février 2008

• #4

On timer pas accepté

Salut

Ca coince avec le on timer... il demande un gosub ??

si ca dit quelque chose... Merci

Ya'v

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 17 Février 2008

• #5

Re : Plusieurs chronomètres sur 1 USF ?

Bonsoir, regarde un fichier sur ce fil
où 210 chronos tournaient en même temps

 

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 17 Février 2008

• #6

Re : Plusieurs chronomètres sur 1 USF ?

re:

voici un exemple de 4 chronos en meme temps

Dans workbook initialisation des drapeaux, lancement du chrono

Dans module 1 : Procedure de Chrono, avec affichage des temps en colonne B en fonction des drapeaux

Dans Module 2 gestion des boutons

Dans la feuille 4 Bouton Go / Stop

Go initialise le depart colonne A
STop : Raz Colonne A et B et memorisation du temps en colonne C

Fichier joint

 

Pièces jointes

• 4_chronos.zip

  9.4 KB · Affichages: 65

Vote positif 0 Vote négatif

ya_v_ka

XLDnaute Impliqué

• 17 Février 2008

• #7

Re : Plusieurs chronomètres sur 1 USF ?

Bonsoir vous deux

Le fil je l'ai épluché mais il ne m'apportait rien.

Par contre merci pour la démo, là je vais m'en sortir. Je découvre le "call chrono" et le on time passe mieux en application.ontime...

Pas évident ce VBA ! pfffff

Merci les pros, merci Wielfried

Bonne soirée

Ya'v

 

Vote positif 0 Vote négatif

ya_v_ka

XLDnaute Impliqué

• 24 Février 2008

• #8

Re : Plusieurs chronomètres sur 1 USF ?

Salut tout le monde

Voici mon projet finalisé, si ça peut interresser quelqu'un ...

J'ai juste un soucis, si l'USFChange fonctionne à merveille avec XL2003, il semblerait qu'il me cause du soucis avec la version 2002...

Si quelqu'un peut m'expliquer à quoi ça tient, ou quel est l'ordre que 02 ne reconnait pas ?

D'avance merci

Ya'v

 

Pièces jointes

• Salle Billard 1.zip

  37.5 KB · Affichages: 57

Vote positif 0 Vote négatif