REcherche et incrémentation

Marina1234567 Messages postés 1 Date d'inscription   Statut Membre Dernière intervention   -  
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Je souhaiterais un petit peu d'aide pour un petit code en Visual basic.
Je ne m'y connait que très légèrement.
J'aurai besoin d'une macro qui coderait cette petite chose :
- une colonne remplie de chiffres de 1 à 10 de manière aléatoire.
- J'aurai besoin qu'on me retourne les emplacements où se trouve le chiffre "1" dans cette colonne et que l'on m'incrémente un compteur.

Dans des cases du tableur on m’indique : A F et H et dans une autre case du tableau on m'insère le nombre d'occurrence du chiffre 1 soit 3 dans l'exemple ici.

1 réponse

michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Bonjour

déjà pour tirer au sort
Sub noter()
Dim cellule As Range

Application.ScreenUpdating = False
Randomize
For Each cellule In Range("B2:B10")
nbre = Int(Rnd * 9) + 1
cellule = nbre
Next cellule
End Sub


mais ta capture d'écran ne nous est pas utile
Mettre le classeur sans données confidentielles en pièce jointe sur https://www.cjoint.com/
et coller le raccourci proposé (clic droit) dans le message de réponse

Dans l’attente


 Michel
0