XL 2016 Mots aléatoires sans doublons

Etoto · 28 Juin 2021

Bonjour,

J'aimerais faire qu'une formule (ou un VBA, comme vous voulez) renvoie aléatoirement les mots d'une liste. J'ai réussi à le faire grâce à une autre discussion, mais maintenant j'aimerais que les résultats soient uniques sans doublons, je ne sais pas si c'est possible mais voici un PJ abrégé pour vous montrer mon Alea et essayer de le rendre unique.

Merci d'avance à tous

job75 · 28 Juin 2021

Bonjour Etoto, Lolote83,

C'est un problème classique qui se règle sans VBA, voyez le fichier joint et cette formule en C2 :

Code:

=RECHERCHEV(PETITE.VALEUR(A:A;LIGNE()-1);A:B;2;0)

A+

Lolote83 · 28 Juin 2021

Salut ETOTO,
Content de te retrouver.
Une proposition qui teste si un mot est déjà inscrit, la macro en inscrit un autre.
Attention, cela peut tourner sans arrêt car si à chaque fois le nombre choisi aléatoirement est identique, donc même mot, cela peut durer longtemps
@+ Lolote83

Etoto · 28 Juin 2021

Re,

Lolote83 à dit:
Content de te retrouver.

Décidément, @Lolote83, tu es le best pour m'aider. Merci beaucoup de ton ce que tu as fait pour moi et bonne journée. D'ailleurs ta macro est parfaite.

job75 · 28 Juin 2021

Bonjour Etoto, Lolote83,

C'est un problème classique qui se règle sans VBA, voyez le fichier joint et cette formule en C2 :

Code:

=RECHERCHEV(PETITE.VALEUR(A:A;LIGNE()-1);A:B;2;0)

A+

Etoto · 28 Juin 2021

job75 à dit:
Bonjour Etoto, Lolote83,

C'est un problème classique qui se règle sans VBA, voyez le fichier joint et cette formule en C2 :

Code:

=RECHERCHEV(PETITE.VALEUR(A:A;LIGNE()-1);A:B;2;0)

A+

Re,

Joli merci beaucoup.

Dranreb · 28 Juin 2021

Bonjour.
Une version qui utilise ma fonction perso ListeAl.
J'y ai aussi mis ma définition d'objet VBA ListeAléat, à tout hasard, mais ce n'est pas utilisé, là.

Etoto · 28 Juin 2021

Dranreb à dit:
Bonjour.
Une version qui utilise ma fonction perso ListeAl.
J'y ai aussi mis ma définition d'objet VBA ListeAléat, à tout hasard, mais ce n'est pas utilisé, là.

Re,

Pourquoi elle est matricielle ta formule ? Merci en tout cas

Dranreb · 28 Juin 2021

Pour appliquer tous les numéros produits par la Function, puisqu'elle en renvoie un tableau.

Etoto · 28 Juin 2021

Dranreb à dit:
Pour appliquer tous les numéros produits par la Function, puisqu'elle en renvoie un tableau.

Re,

Bravo, tu as ton 20'000éme message gg @Dranreb

Etoto · 28 Juin 2021

Dranreb à dit:
Bonjour.
Une version qui utilise ma fonction perso ListeAl.
J'y ai aussi mis ma définition d'objet VBA ListeAléat, à tout hasard, mais ce n'est pas utilisé, là.

Re,

Elle est top ta fonction, quel variable ou paramètre utiliser pour augmenter ou réduire la taille de la liste des résultats ?

Merci d'avance

Dranreb · 28 Juin 2021

Toutes les explications dans ce classeur.

Et pour répondre à la question, le 3ème parametre NRés permet de l'indiquer, mais il est facultatif, et la taille de la plage matricielle est assumée s'il est omis.

XL 2016 Mots aléatoires sans doublons

Etoto

XLDnaute Barbatruc

Pièces jointes

job75

Lolote83

XLDnaute Barbatruc

Pièces jointes

Etoto

XLDnaute Barbatruc

job75

XLDnaute Barbatruc

Pièces jointes

Etoto

XLDnaute Barbatruc

Dranreb

XLDnaute Barbatruc

Pièces jointes

Etoto

XLDnaute Barbatruc

Dranreb

XLDnaute Barbatruc

Etoto

XLDnaute Barbatruc

Etoto

XLDnaute Barbatruc

Dranreb

XLDnaute Barbatruc

Pièces jointes

Discussions similaires