Choix au hasard d'un nom

[Baudouin]

Bonjour à tous, la fonction recherche étant indisponible dans l'instant, voici ce qui m'amène:

Dans le cadre d'une formation, j'ai besoin de pouvoir choisir au hasard,ex en B5, un Nom de produit dans une liste, ex plage A2:A20. Il conviendra alors à "l'élève" de fournir le code associé.

Le but est de rendre un bachotage insipide en quelquechose de plus ludique !!!

Cordialement: Patrick

PS: Je suis plus à l'aise avec les fonctions (ALEA ???), qu'avec des macros, mais ...

 

[Jean-Marie]

Bonjour Baudoin

Essaye ce code

Public Sub Bachotage()
Range("B5") = Range("A1").Offset(Int((20 * Rnd) + 1), 0)
End Sub

@+Jean-Marie

 

[Baudouin]

Bonjour Jean-Marie et merci pour cette précieuse ( et génialement simple) macro !!!

Cordialement: Patrick