Echantillon aléatoire Excel 2007

Bonjour à tous

Je souhaiterais savoir comment faire pour sélectionner via excel 2007 un échantillon aléatoire de 500 clients (avec leur variable respective) sur une base de 16 000.

Mes clients sont en colonne A1 et les variables vont de A2 à A5.

Le but de cet échantillon est par la suite de procéder à une enquête téléphonique.

Merci par avance de vos réponse.

Bonjour,

Mes clients sont en colonne A1 et les variables vont de A2 à A5.

envoie un extrait de feuille, notamment pour voir comment sont formulées les variables

Amicalement

Claude

Merci de votre réponse, mais étant nouvelle sur ce forum je ne sais comment faire pour envoyer un document excel.

Néanmoins j'ai fait une erreur concernant la disposition des variables.

En colonne (A1 à A 16000) j'ai le nom des clients.

B1 à B16000 le code client.

C1 à c16000 l'adresse

D1 à D16000 le numéro de téléphone

Je souhaiterai tirer aléatoirement 500 lignes correspondant à 500 clients avec leur variable respective.

J'espère que c'est plus clair...

Merci


Je parle d'effectuer cette manip sur excel, mais le faire sur access serait aussi une alternative. je ne sais pas si c'est possible...

Merci

re,

pour joindre un fichier

(pas besoin de toutes les lignes, ni tel et adresses si confidentiel)

Claude


Bonjour,

à tester,

tu nous diras le temps de traitement sur le fichier réel

ici, 500 tirages sur 1000 inscrits

Sub Tirage() 'de Claude Dubois pour MKa le 10/09/2011
Dim Lg&                                         'nombre inscrits
Dim i%                                          'boucle
Dim x&                                          'ligne aléatoire
Dim Tirages%                                    'nombre tirages à régler
Dim T                                           'chrono
    T = Time
    Tirages = 500                               'à régler (500 demandé)

    Sheets(1).Activate
    Lg = Range("a" & Rows.Count).End(xlUp).Row - 1

    If Tirages > Lg Then Exit Sub               'contrôle
        Application.ScreenUpdating = False
        Sheets(1).Activate

    With Sheets("Résultat")
        .Cells.Clear
        Range("a1:d1").Copy Destination:=.Range("a1")
    End With

    Sheets(1).Copy Before:=Sheets(2)

    With Sheets(2)                              'feuille temporaire
        For i = 1 To Tirages
            x = Application.RandBetween(2, Lg)
            .Rows(x).Copy Destination:= _
            Sheets("Résultat").Range("a" & Rows.Count).End(xlUp)(2)
            .Rows(x).Delete                     'pour éviter doublons
            Lg = Lg - 1
        Next i
        Application.DisplayAlerts = False
        .Delete                                 'supprime feuille temporaire
    End With
    MsgBox ("temps macro = " & Format(Time - T, "hh:mm:ss"))
End Sub

Amicalement

Claude

704mka-alea.xlsm (73.10 Ko)

Bonjour Claude,

Je vous remercie de votre réponse, mais je ne sais pas comment appliquer votre solution sur Excel... je ne gère pas assez Excel.

N'y aurait-il pas une solution plus simple ? Par exemple une fonction déjà intégrée ? (aléa?)

Ou pouvez vous m'expliquer comment appliquer cette première solution ?

Bonjour,

y-a rien de compliqué la-dedans !

tu as juste à copier/coller les 16000 noms dans la Feuil1

et lancer la macro

Claude

Merci beaucoup ! Ça marche !!! et le temps de traitement a été très rapide (1 seconde).

Encore Merci car vous m'avez vraiment enlevé une épine du pied !

Marine

Re,

Version2

On peut imaginer de faire plusieurs tirages

après le 1er tirage, il reste 15500 noms sur les 16000 du départ,

on fait un 2ème tirage sur les 15500

on fait un 3ème tirage sur les 15000

on fait un 4ème tirage sur les 14500

etc...

çà peut servir ?

Amicalement

Claude

263mka-alea-2.xlsm (170.88 Ko)

Bonjour,

J'ai utilisé cette macro pour un besoin similaire.

J'aimerais juste ajouter la condition suivante:

L'échantillon ne porte que sur les lignes pour lesquelles le contenu de la colonne B = "OK"

Et je galère...

Quelqu'un pour m'aider svp? Merci

Bonjour,

Je souhaite également réaliser un échantillon représentatif sur Excel. Seulement je suis vraiment débutante sur excel et je ne sais pas du tout comment m'y prendre.

Je dispose d'une liste d'associations de 111 noms et comme je vous le dis plus haut, j'aimerais créer un échantillon représentatif de ces 111 associations.

Est ce que quelqu'un est en mesure de m'aider ?

D'avance merci,

Laure

MKa a écrit :

Merci beaucoup ! Ça marche !!! et le temps de traitement a été très rapide (1 seconde).

Encore Merci car vous m'avez vraiment enlevé une épine du pied !

Marine

Bonjour,

Je voulais utiliser cette macro pour résoudre mon problème, mais en l'appliquant à ton fichier je remarque que c'est les 500 premiers enregistrements qui sont selectionnés donc la selection nest pas aleatoire.

Des idées s'il te plait?

Merci

Linz

Rechercher des sujets similaires à "echantillon aleatoire 2007"