REcherche et incrémentation

Marina1234567 Messages postés 1 Statut Membre -  
michel_m Messages postés 18903 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

  1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    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