A voir également:
- REcherche et incrémentation
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Rechercher ou entrer l'adresse mm - recherche google - Guide
- Recherche photo - Guide
- Recherche et remplacer word - Guide
- Je recherche une chanson - Guide
1 réponse
Bonjour
déjà pour tirer au sort
mais ta capture d'écran ne nous est pas utile
Dans l’attente
Michel
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