REcherche et incrémentation

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

  1. Contributeur
    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