Affiche nombre dans cellule

Bonjour

Dans mon tableau exemple je souhaiterais quand je clique sur le bouton , qu'un nombre au hasard de la colonne A feuille BdD ,

s'affiche dans la cellule jaune de la feuille Accueil

Merci pour votre aide

Cordialement

7affichage.xlsm (18.98 Ko)

Re Bonjour

Pas de solution à me proposer?

Crdlt

bonjour,

Une solution possible:

Dim Deb As Integer, Maxlig As Long, Lig  As Long
Randomize
Deb = 2
Maxlig = Worksheets("BdD").Range("A" & Rows.Count).End(xlUp).Row
Lig = Int((Maxlig - Deb + 1) * Rnd + Deb)
Worksheets("Accueil").Range("B3").Value = Worksheets("BdD").Range("A" & Lig).Value

A+

Bonsoir

Merci pour ta réponse exactement ce qu'il me fallait

Cordialement

Bonsoir,

Peut-être avec aléa voir Pj

Clic sur le bouton F9 ou sur la touche f9 du clavier pour voir évoluer les chiffres

Slts

3affichage.xlsm (17.97 Ko)
Rechercher des sujets similaires à "affiche nombre"