[Résolu] Choisir des colonnes aléatoirement

[Lone-wolf]

Bonsir à tous,

dans le fichier joint, j'ai créé en quelque sorte un égualiseur (leds). Maintenant, j'aimerais ajouter Randomize, pour qu'il choisisse une colonne au hasard ( ici il y en a 7). Malheureusement, je n'arrive pas a obtenir le résultat voulu.

Merci par avance.

J'oubliai: pour voir le résultat, double-cliquez sur la feuille.



A+ 😎

 

[camarchepas]

Re : Choisir des colonnes aléatoirement

Bonsoir,

je ne vois nul part le rnd pour récupérer la valeur aléatoire .

Dim MyValue
Randomize    ' Initialise le générateur de nombres aléatoires.

' Renvoie une valeur aléatoire comprise entre 1 et 6.
MyValue = Int((6 * Rnd) + 1)

 

[Gelinotte]

Re : Choisir des colonnes aléatoirement

Bonjour,

Exemple : Range("e" & i)

Si "e" et ses comparses étaient une variable, il n'y aurait que cette variable à randomizer.

Ou un select case peut-être dont le case serait randomnizé.

G

 

[Lone-wolf]

Re : Choisir des colonnes aléatoirement

Bonsoir camarchepas, Gelinotte.

Merci pour votre intervention.

@camacherpas: c'est normal, je l'ai supprimé vu que le Rnd() n' était pas satisfaisant.
Pour l'exemple donné, je ne comprends pas.

@Gelinotte: non Gelinotte, "e"(ici en l'occurence "c" & x); c c'est la colonne x la variable.

A+ 😎

 

[Gelinotte]

Re : Choisir des colonnes aléatoirement

Bonjour,

Espérant que ce soit une piste ...

G

 

[Lone-wolf]

Re : Choisir des colonnes aléatoirement

Re Gelinotte,

Super! Merci infiniment.

Et est-qu'il est possible d'en augmenter la vitesse?

A+ 😎

 

[camarchepas]

Re : Choisir des colonnes aléatoirement

Bonsoir Gelinotte,

Super mise en pratique du générateur, bon effectivement , il n'y a que 6 barres de led et pas sept.

Voici Lone-wolf, y'a plus qu'a faire un aléatoire sur la durée et la il y aura du rythme , lol

 

[camarchepas]

Re : Choisir des colonnes aléatoirement

t = Timer + 0.01: Do Until Timer > t: DoEvents: Loop à remplacer par

for t = 1 to 1000:next t ' 1000 est à régler pour obtenir la vitesse désirée

 

[Lone-wolf]

Re : Choisir des colonnes aléatoirement

Re, camarchepas.

Nikel! Merci beaucoup.

Et ce n'est pas de trop: Merci beaucoup à tous les deux.

Très bonne soirée. 😎