Macro While Timer + durée

[JJ1]

Bonjour,

J'ai effectué des recherches sur la fonction Timer en VBA mais rien ne correspond vraiment, difficile de reconstituer des patchs par ci par là.

J'ai détaillé dans le fichier joint le déroulement du Timer durant les 30 secondes, idéalement mais certainement difficile à réaliser.

Merci de votre aide.

A++

 

[Modeste geedee]

Re : Macro While Timer + durée

Bonsour®

J'ai détaillé dans le fichier joint le déroulement du Timer durant les 30 secondes, idéalement mais certainement difficile à réaliser.

Difficile ??? oui ... 🙄
mais en trichant un peu ... 😉 ça y ressemblera beaucoup.(*)


partant du principe que l'on n'affiche pas en temps réel les nombres tirés aléatoirement, on connait cependant leur durée...
on peut alors générer aléatoirement la séquence de nombres en y affectant leur durée respective

et ainsi savoir préalablement quel nombre est tiré à la 15éme, 25eme, 30eme seconde
le timer ne servant alors qu' a afficher le temps écoulé
un action onTime affichera alors séquentiellement le nombre correspondant(déjà connu dès le début du décompte).


(*) quoique un peu tiré par les cheveux...😎

 

[JJ1]

Re : Macro While Timer + durée

Bonjour Modeste,

Je vois que tu aimes bien l'aléatoire.. moi aussi. Merci pour ta macro, très beau travail. Je vais étudier tout ça.

Quelques questions car rien ne s'affiche...c'est impossible de savoir préalablement les nombres "tombant" exactement à un instant t, du fait qu'ils "tournent" en mémoire aléatoirement dans n'importe quel ordre (ex de suite:10 1 9 8 7 10 4 1 1 6 2 2 3 8 7 9....
C'est impossible.

Pour retirer un nombre tiré à un instant t de la liste de 1 à 10, j'avais pensé modifier alors sa durée en colonne F à 0 ( 0 seconde= pas de défilement)

Je regarde et je te dirai la suite, en tout cas merci.

a+

 

[JJ1]

Re : Macro While Timer + durée

Re,
Je viens de comprendre pourquoi tu écrivais "préalablement", c'est parce que les 150 nombres sont tirés en colonne A au début du timer et non en défilement (sans affichage) tout au long des 30 secondes aléatoirement selon la durée, en ne retenant que celui qui est "présent" à l'instant t (et qui est donc retiré de la liste).

Comme tu dis, pas simple !

a+

 

[JJ1]

Re : Macro While Timer + durée

Bonjour
Est il possible de réaliser le code simplifie sans la durée avec la colonne F supprimée?
Merci

 

[Modeste geedee]

Re : Macro While Timer + durée

Bonsour®

😕 colonne F ???

application du format personnalisé :
;;; aux cellules D1 et H1
suppression du texte du bouton
masquer les colonnes inutilisées

🙁 plus d'indicateur de fonctionnement ...

version V2
- application des conseils précédents
- indicateur de fonctionnement (discret)
- archivage facultatif des tirages
- pavés de code commentés

 

[JJ1]

Re : Macro While Timer + durée

Bonjour Modeste,

Merci pour ton code, je vais l'analyser

je voulais supprimer la notion de durée (colonne J et non F : sorry !) et simplement faire un tirage en fonction du timer (15-10 et 5sec) en retirant les nombres comme dans la première version.
Tous les nombres ont la même durée de défilement interne.

Merci

Bonne journée

 

[Modeste geedee]

Re : Macro While Timer + durée

Bonsour®
les nombres sont retirés lors de la génération préalable

les durées sont modifiables en colonne J
le fait de changer la durée ne change pas l'algorithme, hormis peut etre la plage en colonne A,B,C si les durées sont très bréves

si les durées sont d'une seconde une table(colonne A) de 90 valeurs devrait etre amplement suffisante.