petit problème de variable

Bonjour , il est très simple d'écrire une fonction qui tire un nombre aléatoire entre 0 et un nombre X .
Moi je souhaiterais savoir tirer un nombre aléatoire entre 0 et un nombre X , mais sachant que le nombre X correspond à la valeur qu'il y a dans la cellule ligne 8 colonne courante , colonne ù on se trouve quoi .

Donc voici une idée de code que l'on doit modifier un peu :

Code:

---

1 2 3 4

function aleaNombre() aleaNombre = Int(Rnd * X + 1) End Function

---

Je dois donc donner comme valeur à X , la valeur qu'il y a dans la cellule ligne 10 et la colonne courante , quelqu'un voit comment faire ?
J'ai essayé avec désignation de plage...mais rien n'y fait .

merci

bonjour shaku le forum brute comme cela sans plus de precisions !!!

Code:

---

1 2 3

function aleaNombre() aleaNombre = Int(Rnd * ActiveCell.Value + 1) End Function

---

euh non tu n'as pas compris ton code ne répond absolument pas à ce que je veux , relis bien lol

bonjour,

Code:

---

1 2 3 4

function aleaNombre() aleaNombre = Int(Rnd * cells(10,ActiveCell.column) + 1) End Function

---

non ça ne va pas donc je vais bien préciser ce que je veux :

Imaginez un tableau avec sur la 1ère ligne , dans chaque case des nombres différents . Dans chaque colonne du tableau je dois renvoyer un nombre aléatoire entre 0 et le nombre de la 1ère ligne .

La macro qui réalise ceci je sais l'écrire , je dois juste écrire la fonction qui renvoie un entier compris entre 0 et le nombre de la 1ère ligne . Voici un exemple de tableau :

20 50 30 ' 1ere ligne
18 22 13 ' 2eme ligne
15 50 12 '3eme ligne

etc etc... Donc il me faut une fonction qui génére des nombres dans la 1ere colonne compris entre 0 et 20 , dans la seconde compris entre 0 et 50...

J'espère que je m'explique assez précisément...

Bonsoir, Shaku,

ta question est-elle finalement et simplement :
Comment lire en boucle le contenu de cellules (pour en faire ensuite ce que tu veux,... tirer un nombre aléatoire ou pas, enfiler des chaussettes ou un pull-over ou pas) ?
et écrire ce que tu veux (voir liste plus haut) où tu as décidé en fonction de l'endroit de ta lecture ?

j'ai essayé ce petit code et il ne marche pas je ne comprends pas :

Code:

---

1 2 3 4 5 6

Function aleaNombre() Dim j As Integer For j = 10 To 18 aleaNombre() = Int(Rnd * Cells(10, j) + 1) Next j End Function

---

Ce code est censé me renvoyer un nombre aléatoire entre 0 et les nombres contenus sur la ligne 10 des colonnes 10 à 18 mais non , quelqu'un voit pq ?

je veux un code en fait pour la ligne 10 colonne j , et c'est ce colonne j qui m'empêche de tout faire :evilred:

Bonsoir,

De ce que j'ai compris, sans passer par du code :

Code:

---

=ENT(ALEA()*$A$1+1) ' pour la colonne A

---

en passant par du code :

Code:

---

Int(Rnd * cells(1,ActiveCell.column) + 1)

---

Mais c'est tellement proche de ce qui t'a été proposé que je ne suis pas sûre que ce soit la bonne réponse...

Re,

Shaku :
Une fonction qui ne reçoit aucun paramètre et ne retourne aucune valeur est tout sauf une fonction !

Montre-nous donc comment tu l'appelles (depuis où, comment et pour en faire quoi )... ton code d'utilisation, quoi ...!!!

Salut
Pourquoi du vba ? les formules ne te conviennent elles pas? Je pense qu'il serait possible de réaliser cela.

Pour trouver ce que tu cherches je te conseil de t'intéresser au fonction d'excel

Code:

---

Application.WorksheetFunction....

---

Notamment a Max, qui te permettra de trouver la valeur la plus haute de la plage (ta colonne courante)
et Match qui te permettra de trouver la ligne qui contient la valeur que tu cherche.

Si tu veux des infos détaillées sur ces fonctions, va dans excel et dans les fonction cherche Max (pour max la ca va) et Equiv 'pour match) comme ça tu sauras quoi mettre en paramètre.

A++
Qwaz

ça ira les gars je vais réussir à me débrouiller , je vous remercie ;)