Excel : Choix au hasard d'une cellule dans une colonne

Question

Bonjour, 

J'ai un fichier avec 3 colonnes (A B et C) qui font 1000 lignes chacune.

Je voudrais pouvoir selectionner au hasard dans ces colonnes 100 lignes au hasard. 
Par exemple les lignes :
A17 B17 C17
A58 B58 C58
....................
....................
A760 B760 C760

Je voudrais copier a part ces 100 valeurs pour pouvoir les exploiter par la suite. Cela m'est egale de les copier dans une colonne ou 3 colonnes.

Pourriez-vous m'eclairer sur la procedure a suivre?
Cordialement.

PHILOU10120 · Accepted Answer

Bonjour

Une idée
Pour récupérer une information au hasard dans une cellule en colonne A de A1 à A1000 sur la feuille 2
 
=INDIRECT(ADRESSE(ALEA.ENTRE.BORNES(1;1000);1;3;1;"Feuil2");1)

Vous donne une adresse aléatoire entre A1 et A1000 sur la feuille 2

=ADRESSE(ALEA.ENTRE.BORNES(1;1000);1;3;1;"Feuil2")

Pour avoir un numéro aléatoire ente 1 et 1000

=ALEA.ENTRE.BORNES(1;1000)

Gyrus · Answer

Bonjour,

Tu peux utiliser la macro suivante :

Sub ChoixAleatoire()Dim Plage As RangeDim Valeur As String    Set Plage = Range("A1:C1000")    While Application.CountA(Columns(5)) < 100        Valeur = Plage(Int(3000 * Rnd) + 1)        If Application.CountIf(Columns(5), Valeur) = 0 Then            Range("E" & Rows.Count).End(xlUp).Offset(1) = Valeur        End If    Wend    Set Plage = NothingEnd Sub

A+

Excel : Choix au hasard d'une cellule dans une colonne

2 réponses

Votre réponse

Discussions similaires

Newsletters