OVH Cloud OVH Cloud

sorte de chronometre

3 réponses
Avatar
Elicend_News
Bonjour

je souhaite faire plusieurs manipulation a partir de macro exxel
représentant en gros un chronometre, mais jusqu'a présent, j'utilise une
succession de timer que j'assigne a des cellules et ensuite je fait une
soustraction :

resultat, ca fonctionne, mais il faut bien reconnaitre que la précision
n'est pas térrible terrible et je retombe plusieur fois sur les meme séries
de chiffres apres la virgules : il me faudrait une précision de l'ordre du
Centieme de seconde (pour le fun) et de l'ordre du dixieme pour traiter
ensuite l'information...

a au fait petite précision je declenche l'impulsion en appuyant sur une
touche du clavier, ou en cliquant sur un bouton de ma souris :)

deuxieme question :
je voudrais chronometrer le temps pendant lequel j'appui sur une touche du
clavier, et si possible y associer une progresse bar qui evolue en meme
temps (une seule pression sur la touche, touche en bas - chronometrage - ,
puis relachement de la touche fin du chronometrage, et je voudrai (ok ok
j'en demande beaucoup) que la macro test en meme temps les impulsions
décrite dans la premieres question

bon a mon avis j'ai pas ete clair moi ca me parait evident mais ca fait 6
mois que je suis dedans lol :)

Elicend

3 réponses

Avatar
Hervé
Salut Elicend,
J'ai un peu de peine à comprendre ce que tu veux mais voici une piste avec
une API.

A mettre dans un module standard :
----------------
Declare Function GetTickCount Lib "Kernel32" () As Long 'API

Public Arreter As Boolean 'intérupteur

Public Sub Chrono()
Dim Top As Long
Do
If Arreter = True Then Exit Do
Top = GetTickCount()
'10 pour 100ème de Seconde
'100 pour 10ème de Seconde
'1000 pour Seconde
Do While GetTickCount() < Top + 10
DoEvents
Loop
[A1] = [A1] + 1
DoEvents
Loop
End Sub
------------------
Comme je ne sais pas sur quel évennement tu déclache ton chrono, je l'ai mis
sur "Worksheet_SelectionChange". Pour le test, tu change de cellule le
chrono se lance tu rechange il s'arrête et ainsi de suite. L'égrainement est
indiqué en A1 :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Arreter = Not Arreter
Chrono
End Sub

Hervé.

"Elicend_News" a écrit dans le message news:
3f17e717$0$1297$
Bonjour

je souhaite faire plusieurs manipulation a partir de macro exxel
représentant en gros un chronometre, mais jusqu'a présent, j'utilise une
succession de timer que j'assigne a des cellules et ensuite je fait une
soustraction :

resultat, ca fonctionne, mais il faut bien reconnaitre que la précision
n'est pas térrible terrible et je retombe plusieur fois sur les meme
séries

de chiffres apres la virgules : il me faudrait une précision de l'ordre du
Centieme de seconde (pour le fun) et de l'ordre du dixieme pour traiter
ensuite l'information...

a au fait petite précision je declenche l'impulsion en appuyant sur une
touche du clavier, ou en cliquant sur un bouton de ma souris :)

deuxieme question :
je voudrais chronometrer le temps pendant lequel j'appui sur une touche du
clavier, et si possible y associer une progresse bar qui evolue en meme
temps (une seule pression sur la touche, touche en bas - chronometrage - ,
puis relachement de la touche fin du chronometrage, et je voudrai (ok ok
j'en demande beaucoup) que la macro test en meme temps les impulsions
décrite dans la premieres question

bon a mon avis j'ai pas ete clair moi ca me parait evident mais ca fait 6
mois que je suis dedans lol :)

Elicend




Avatar
Misange
Bonjour,
Tu trouveras plusieurs exemples de chronometres sur excelabo, page tempo.

--
Misange migrateuse http://www.excelabo.net
==== Attention : Disciplus a déménagé !====



"Elicend_News" a écrit dans le message de
news:3f17e717$0$1297$
Bonjour

je souhaite faire plusieurs manipulation a partir de macro exxel
représentant en gros un chronometre, mais jusqu'a présent, j'utilise une
succession de timer que j'assigne a des cellules et ensuite je fait une
soustraction :

resultat, ca fonctionne, mais il faut bien reconnaitre que la précision
n'est pas térrible terrible et je retombe plusieur fois sur les meme
séries

de chiffres apres la virgules : il me faudrait une précision de l'ordre du
Centieme de seconde (pour le fun) et de l'ordre du dixieme pour traiter
ensuite l'information...

a au fait petite précision je declenche l'impulsion en appuyant sur une
touche du clavier, ou en cliquant sur un bouton de ma souris :)

deuxieme question :
je voudrais chronometrer le temps pendant lequel j'appui sur une touche du
clavier, et si possible y associer une progresse bar qui evolue en meme
temps (une seule pression sur la touche, touche en bas - chronometrage - ,
puis relachement de la touche fin du chronometrage, et je voudrai (ok ok
j'en demande beaucoup) que la macro test en meme temps les impulsions
décrite dans la premieres question

bon a mon avis j'ai pas ete clair moi ca me parait evident mais ca fait 6
mois que je suis dedans lol :)

Elicend




Avatar
Elicend_News
Merci a tous

je vais essayer de faire un message plus clair avec exactement le but de mon
application en détail peut etre que je suis passé a coté de methode plus
simple que ce que j'utilise pour arriver a mes fin

@ bientot

elicend
"Elicend_News" a écrit dans le message de news:
3f17e717$0$1297$
Bonjour

je souhaite faire plusieurs manipulation a partir de macro exxel
représentant en gros un chronometre, mais jusqu'a présent, j'utilise une
succession de timer que j'assigne a des cellules et ensuite je fait une
soustraction :

resultat, ca fonctionne, mais il faut bien reconnaitre que la précision
n'est pas térrible terrible et je retombe plusieur fois sur les meme
séries

de chiffres apres la virgules : il me faudrait une précision de l'ordre du
Centieme de seconde (pour le fun) et de l'ordre du dixieme pour traiter
ensuite l'information...

a au fait petite précision je declenche l'impulsion en appuyant sur une
touche du clavier, ou en cliquant sur un bouton de ma souris :)

deuxieme question :
je voudrais chronometrer le temps pendant lequel j'appui sur une touche du
clavier, et si possible y associer une progresse bar qui evolue en meme
temps (une seule pression sur la touche, touche en bas - chronometrage - ,
puis relachement de la touche fin du chronometrage, et je voudrai (ok ok
j'en demande beaucoup) que la macro test en meme temps les impulsions
décrite dans la premieres question

bon a mon avis j'ai pas ete clair moi ca me parait evident mais ca fait 6
mois que je suis dedans lol :)

Elicend