fonction aléatoire sur excel Résolu/Fermé

Question

Bonjourj'aimerais savoir si, sur excel 97, il existe une fonction permettant de choisir une cellule au hasard parmi une liste prédéfinie, car je n'en trouve pas.merci beaucoup de pouvoir m'aider

Berounet · Answer

Essaie ça, je viens de faire et ça marche. Je suis content pour une fois que j'arrive à aider qq.

Sub random()
'
' random
' Macro enregistrée le 13/02/2005 par berounet

x = Int(Rnd(1) * 10): ' remplacer 10 par le dépl hor max souhaité
y = Int(Rnd(1) * 10): ' remplacer 10 par le dépl vert max souhaité

Range(Chr$(65 + x) & y).Select

ActiveCell.Value = "X"

End Sub

milsabor · Answer

excusez moi mais j'ai pas compris ce que je devais mettre dans la cellule...et puis c'est quoi cette histoire de macro??merci

milsabor · Answer

je m'explique:
sur excel, j'ai fait une liste de vocabulaire d'anglais, et yen a près de 800. pour pouvoir les réviser, j'aimerais établir une petite liste qui"pioche" au hasard dans la liste, comme ca je peux ré&viser petit bout par petit bout.seulement je connais pas de fonction permettant de faire ca
donc, pour te répondre, je pense que c'est une plage de cellules contigues et qu'il s'agit de texte comme info que je met en entrée

gbinforme · Answer

bonjour

je te propose ceci :

Sub sélection()

Dim choix, nbr_elm, nbr_sel, lig

nbr_sel = 20 ' le nombre de lignes à réviser
' le vocabulaire est en A1 sur la "feuil1" et sur 10 colonnes
' le choix est en A1 sur la "feuil2"

nbr_elm = Worksheets("feuil1").Range("a1").End(xlDown).Rows

For lig = 0 To nbr_sel

choix = Int(Rnd(1) * nbr_elm):

Worksheets("feuil2").Range("a1").Offset(lig).Formula = "=Feuil1!R[" & choix & "]C"
Worksheets("feuil2").Range("a1").Offset(lig).Resize(1, 10).FillRight

Next lig
End Sub

Cela te permet de récupérer sur ta feuille 2 le nombre d'éléments désirés.

si ton classeur est construit différement il suffit d'adapter.

goldenboy68 · Answer

Salut,

J'avais un peu de temps cette nuit, alors j't'ai fait un p'tit programme de révision...télécharge le fichier .xls à cette adresse:

...ensuite, t'as plus qu'à mettre tes 2 colonnes de mots là où tu veux, tu remplis le minuscule formulaire et tu commences ta partie! Lol

ici la capture d'écran: http://membres.lycos.fr/famillepfeiffer/samy/Vocabulaire.htm

ici le fichier:
http://membres.lycos.fr/famillepfeiffer/samy/Vocabulaire.xls

Have Fun! Samy

milsabor · Answer

euh merci mais il bug des le debut ton programme!!

Armojax · Answer

Bonjour,

Je propose une piste simpliste, en supposant que :
- le vocabulaire se trouve en colonne 1 d'une feuille appelée Liste, sans titre et sans trous
- que le tirage au sort se pratique dans une feuille appelée Tirage

Dans le code VBA de la feuille Tirage, mettre le code suivant :

Private Sub Worksheet_Activate()

    Dim Nombre As Long
    Nombre = Sheets("Liste").Cells(1, 1).CurrentRegion.Rows.Count
    Sheets("Liste").Cells(1, 10).Value = Nombre

End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Call Tirage
End Sub

Dans un module VBA, mettre le code suivant :

Sub Tirage()

    Dim Nombre  As Long
    Dim Hasard  As Long
    Dim FL      As Worksheet
    Dim FT      As Worksheet
    
    Set FL = Sheets("Liste")
    Set FT = Sheets("Tirage")
    
    Randomize
    
    Nombre = FL.Cells(1, 10).Value
    Hasard = Int(Rnd() * Nombre) + 1
    FT.Cells(10, 3).Value = FL.Cells(Hasard, 1)
    
End Sub

Quand on active la feuille Tirage, une macro de feuille calcule automatiquement le nombre de mots, et le stocke en cellule (1, 10) de la feuille Liste. De cette façon, quand on vient de mettre à jour la liste, ce nombre est recalculé.

Pour déclencher la macro de tirage, j'adopte la solution simpliste : déplacer la sélection dans la feuille Tirage (cliquer au hasard, déplacer les flèches...)
Plus élégamment, on peut mettre un bouton pour appeler la macro.
On peut soigner encore en faisant un petit formulaire qui monte automatiquement à l'ouverture du classeur, etc.

C'est juste une proposition...

Armojax.

milsabor · Answer

bonjour
merci vous etes sympa mais ya rien qui marche c'est pas grave je vais pas vous embeter plus longtemps, je vais plutôt essayer de me renseigner sur le sujet pour en apprendre un peu plus
merci et salut

goldenboy68 · Answer

Salut,

Désolé, mais si ça marche pas, je capitule! lol!

Mais j'suis entrain d'améliorer le programme pour être encore plus paramétrable. De plus, Excel permettant de faire des graphiques...vais ajouter une partie "Progression" où on verra les progrès effectués, ainsi qu'une feuille où seront recensés les résultats de tous les tests effectués.

Voilà, d'ici qq temps ce sera fait, donc si tu passes un jour à une nouvelle version d'Excel...repasse par ici!

PS: je rajouterai un post quand j'aurai fini mes modifications!

@+! Samy

Manina · Answer

Salut!!! Je suis tombé par hazard sur ce débat et si qq'1 voit ce message, please répondéz-moi...
Je cherche un fonction qui permettrait de tirer au sort avec remise 5 densités différentes afin de réaliser 10 réplicats pour chaque densité!!!! Avez-vous une idée???

goldenboy68 · Answer

Salut,Pas très clair ta question...c'est quoi ta densité et ton réplicat???Si tu disais précisément ce que tu voulais, on pourrait p't'être t'aider!@+!

manina · Answer

Re-Salut..
Merci pour m'avoir répondu..
Alors je m'explique....
Je pars de 5 densités distinctes et je cherche à tirer au sort chaque densité 1 fois (...donc en fait c'est sans remise...) les unes après les autres, pour enfin avoir 10 réplicats de chaque densité à la fin! Voilà, j'espère que c'est plus compréhensible!!!
Merci encore

goldenboy68 · Answer

Re-salut,

Plus compréhensible...bof! lol!

Je sais toujours pas ce que c'est une densité?? Tu la représentes par quoi? Tu veux faire ça dans Excel?

Alors voilà ce que moi j'ai 'cru' comprendre:
- Tu as 5 nombres différents dans 5 cellules d'une première colonne (ex: 1-2-3-4-5)
- Tu veux tirer au sort (donc au hasard) parmi ces 5 nombres (de sorte que tu aies les 5!) et tu les mets dans une seconde colonne (qu'on peut nommer Tirage 1 par exemple).
- Enfin, tu voudrais répéter ce tirage 10 fois pour aller jusqu'à la colonne 'Tirage 10'.

Alors, c'est ça?
Autres questions que je me pose:
- 10 réplicats, c'est l'original + 10 ou l'original + 9 tirages?
- T'as peut-être déjà un fichier qui va te servir de base?

J'attends de tes nouvelles! @+! Samy

Manina · Answer

Alors...
merci pour ta réponse...tu as bien compris par ce que je veux dire...c'est bien de densité de 1 à 5 en chiffres....et c'est bien un tirage au hazard aussi mais sans remise... de sorte qu'au bout de 5 tirage je n'ai plus rien à tirer. Cela me donnera donc 1 réplicat dans chaque catégories de densité (1 à 5)...je devrais donc répéter cette opération 10 fois afin d'avoir N=10 réplicats...
Pour les 10 réplicats, je pars de l'original +9 (donc ça fera réplicats 1; 2; 3; 4; 5; 6; 7; 8; 9; 10)...
Je n'ai pas encore de fichier exacte car je n'ai pas commencé mes expériences....
voilà, en espérant que ça ira mieux...
Merci merci encore....

goldenboy68 · Answer

Voilà...j't'ai fait un p'tit fichier pour tes tirages aléatoires de 'densités'!

Pour l'utilisation:

- Tu remplaces "1, 2, 3, 4 et 5" par tes 5 densités.
- Tu utilises les boutons et tout se fait tout seul!

PS: tu peux cliquer plusieurs fois sur le même bouton si un tirage d'une colonne te plaît pas! lol! (pas besoin de vider le tableau avec le bouton prévu pour ça à chaque fois!)

Si y'a qqch qui ne te conviendrait pas...fais-moi signe!

@+! Samy

Oups...le lien: http://membres.lycos.fr/famillepfeiffer/samy/tirageDensites.xls

goldenboy68 · Answer

Re-coucou tout le monde!

Version améliorée du test de vocabulaire terminée! A télécharger ici:
http://membres.lycos.fr/famillepfeiffer/samy/Vocabulaire v2.xls

Si y'avait des bugs ou remarques sur le fichier...laissez un message ici!!

Voilà! @+!

Samy

Manina · Answer

Salut Samy....
J'ai pas eu le temps e te remercier pour ton petit programme...Merci bien, c'est exactement ce que je voulais....
Peux-tu me l'envoyer sur mon adresse email directement car comme je ne suis pas membre de Lycos, je ne peux pas sauvegarder ton fichier excel... voilà mon mail: manina.nc@caramail.com...
MEci et à bientôt..
Bises
Manina

goldenboy68 · Answer

Oups...

...en donnant ce nom au fichier, j'm'étais douté que ça poserait problème!!! Mais j'ai fait l'erreur de pas vérifier ... mais vous auriez pu rectifier de vous-même la fin du lien: "Vocabulaire v2.xls". A cause de l'espace, le "v2.xls" n'a pas été pris en compte dans le lien!

Bref, pour éviter que ça se reproduise:
http://membres.lycos.fr/famillepfeiffer/samy/VocabulaireV2.xls

Vais tester...OK ça marche!

Dsl pour l'étourderie! @+! Samy

Edit: Sorry, viens de voir ton mail milsabor! J'ai pas les yeux grands ouverts j'crois! lol

Bref, pour dire simplement que si ça marchait pas avant sur Excel 97, ça va certainement pas marcher maintenant (c'est la même base)...mais qui sait...essaie toujours!
Pour apprendre ce type de programmation, je sais pas où je pourrais t'envoyer...moi, j'ai appris tout seul pendant un stage où on m'a demandé d'automatiser qqch. J'ai commencé par les macros (tu peux enregistrer et ensuite visualiser le code que ça engendre), et j'ai lu l'aide fournie dans Excel! C'est bien pratique cette programmation! Tu peux l'utiliser dans Word, Excel et Access ... et ça s'appelle le VBA (Visua Basic for Application) tu trouveras peut-être plus de choses avec ces mots-clés. (c'est du Visual Basic, mais light! lol)

Voilà...j'ai fini! lol @+! Samy

Jay · Answer

Moi je souhaiterais faire un truc très simple, mais je n'y connais rien !!! J'aimerais qu'excel me choisisse un mot au hasard dans une liste que j'auais rentré dnas une colone !!! ça doit pas être très sorcier, mais je n'y comprend rien aux macros !!!

Merci de votre aide...

goldenboy68 · Answer

Non, pas dur! lol'Utilisation de Randomize pour éviter la répétition de séries identiques:        Randomize                ' Remplace 4 par (le nombre de mots dans ta colonne) -1:        tirage = 1 + Round(4 * Rnd)        'tirage contiendra donc une valeur entre 1 et le nombre de mots dans ta colonne        ' Ici, on remplit la cellule cible (remplace 'ligneCelluleCible' et 'colonneCelluleCible' par les valeurs numériques correspondantes):        Sheets("NomDeLaFeuille").Cells(ligneCelluleCible,colonneCelluleCible).Value=Sheets("NomDeLaFeuille").Cells(tirage+1,1).Value'Enfin, j'ai ajouté tirage+1, car je suppose que tu as un ligne de titre à ta colonne qui contient tes mots (si en plus tu as une ligne vide entre la ligne de titre et le début de tes mots, remplace '+1' par '+2').Voilà...y'a plus qu'à glisser un bouton sur ta feuille, mettre ce code sur l'évènement clic! (clic droit sur le bouton...tu devrais trouver)@+! Samy

gbinforme · Answer

bonjour J'aimerais qu'excel me choisisse un mot au hasard dans une listedans la cellule où tu veux récupérer le choix, tu mets la formule :=RECHERCHEH(1;liste;ENT(ALEA()*NB(liste))+1;)pour que cette formule fonctionne, il faut que tu remplace "liste"par la plage où tu as ta liste (A1:A500 par exemple)où mieux que tu sélectionne ta liste et que tu tapes 'liste' dans la zone nom au-dessus de la cellule A1.cette formule te choisis la valeur d'une cellule de ta listeet pour en choisir un nouveau tu tapes sur la touche F9Moi je souhaiterais faire un truc très simpleçà me parait simple !à toi jay de nous dire...mais je n'y comprend rien aux macros !!! pas besoin de macro !

Thiébault · Answer

Salut,Désolé pour le dérangement : je viens de comprendre l'utilité et le fonctionnement du bouton "Mettre à jour les langues"... :o)Merci encore !!!Thiébault

goldenboy68 · Answer

Lol ... ça m'arrange que tu aies trouvé tout seul!...j'avais quand même réfléchi un p'tit peu à l'époque!Bon apprentissage!@+! Samy

BOUCLE30 · Answer

Bonjour Samy et autres,Suite à une recherche de fonction aléatoire, je suis tombé sur tes programmes, qui m'ont bien aidés.J'ai testé le programme pour les densités, impect, j'arrive a sortir un truc, mais y a un HIC... il me sort des chiffres négatif.Alors voila que je t'explique un peu mon truc.J'ai 13 personnes, et 13 secteurs. Je souhaiterais affecté un secteur à chaque personne aléatoirement (idem que pour les densités, le secteur doit sortir kune seule fois).J'ai testé le code que tu as donné a  Manina. Je l'ai bien sur adapté a ma feuille. Le problème comme je disais plus haut, c'est qu'il me ressort 2 à 3 chiffre négatif, et toujours les mm (-1), ché pas pourkoi, et du coup il me supprime 2 à 3 chiffres.Voilà si quelqu'un a une idée, please, pouvez-vous  me contacter...Je pense que le problème viens de ma boucleFor i = 1 To 13        animTiree = -13    While animTiree = -13             Randomize                tirage = 1 + Round(12 * Rnd)Voila voila, si kkun a une info ça serait SUPERMERCI

BOUCLE30 · Answer

RE,ui, donc il me semble que mes correspondances sont bonnes, elles se trouvent dans la deuxième colonne à partire de la ligne 16 --> 28, je voudrais bien te faire passer mon fichier, mais j'ai pas de FTP, de donc ... pas de possibilité de te donner un accès, par contre si tu veux je peux te l'envoyer sur ta boite mail, si bien sur cela te dérange pas...Tiens je te laisse mon mail cbb_kari@hotmail.com si tu veux m'envoyer le tiens, et je te joins mon SUPER FICHIERa++ kari

goldenboy68 · Answer

Hmmm...étourderie quand tu nous tiens!!! Alors ton problème avec la fonction tirage...faut faire: Public Sub tirage... et pas Private Sub tirage Ensuite, les -1 ils apparaissent car t'as mal fait ton copier-coller dans le case 4: Pas bon: Case 4 If anim4Tiree <> True Then animTiree = anim4 End If animTiree = True Bon: Case 4 If anim4Tiree <> True Then animTiree = anim4 End If anim4Tiree = True Un petit 4 qui manquait au milieu! @+! Samy

BOUCLE30 · Answer

Super, merci, tout fonctionne correctement, je vais enfin pouvoir continuer mon projetje sais je me repete, mais MERCI BEAUCOUPA++ Kari

BOUCLE30 · Answer

Super, merci, tout fonctionne correctement, je vais enfin pouvoir continuer mon projetje sais je me repete, mais MERCI BEAUCOUPA++ Kari

cyril · Answer

bonjourJe recherche une fonction dans Excel pour afficher dans une cellule la date de sauvegarde du fichier. Ca existe ? merci.

cyril · Answer

se serai possible sans utiliser les macros?

cyril · Answer

Se serait possible sans utiliser de macros?

gbinforme · Answer

bonjourPour mettre à jour cette cellule où tu veux la date de dernière modification affichée,tu peux aussi rajouter, dans thisworkbook, cette fonction :Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)    Range("c_maj").Value = DateEnd SubIl suffit de nommer la cellule d'affichage avec le nom : c_maj pour que cela fonctionne.La cellule doit avoir les formats dates et/ou heures recherchés.

cyril · Answer

ok.je te remercie.C gentil de m'avoir aider

gbinforme · Answer

bonjourj'avais préparé la fonction avant la question sans macro,mais je ne connais pas de solution possible en fonction pure,car si l'on peut afficher la date on ne peut pas lier à un événement de sauvegarde.il faut copier / coller la macro,  après avoir ouvert l'éditeur(Alt + F11) mais en utilisation, c'est totalement transparent.

cyril · Answer

je vien d'essayer mais ca ne marche pas!Je te remercie quand meme pour kle renseignement.

cyril · Answer

bonjour.Existe t-il une fonction qui puisse afficher une question automatiquement dès que l'on entre un enregistrement?Merci de m'aider.

gbinforme · Answer

bonjourvérifie la manip car je l'utilise depuis excel 97 et cela fonctiomme.tu peux même rajouter : Range("c_maj").Value = Date & " à " & timepour avoir la date et l'heure.

cyril · Answer

ca ne marche toujour pas ton code!

gbinforme · Answer

bonjourca ne marche toujour pas ton code!tu veux certainement dire qu'il ne fonctionne pas,mais s'il y a un problème, il doit te donner un code erreur.Par exemple si tu n'as pas bien nommé la cellule : "la méthode range a échoué".dans ce cas tu sélectionnes la cellule qui doit avoir la date,et dans la zone de saisie en haut à gauche, où apparaît l'adresse de la cellule, tu saisis "c_maj" et cela fonctionnera.si tu n'a pas d'erreur et pas de résultat, c'est que tu n'a pas mis le code où il faut, c'est-à-dire dans "ThisWorkbook",où que tu n'as pas nommé la bonne cellule et alors la date est ailleurs.ta cellule est peut-être trop petite et tu as des "#####".tu vois qu'il faudrait un tout petit peu préciser  "ca ne marche toujour pas ton code!" pour t'aider d'avantage.allez, précises moi un peu la panne.

cyril · Answer

l'erreur est la suivante:La méthode 'Range' de l'objet '_global' a échoué

cyril · Answer

maintenant j'ai une autre erreur qui est : espace file insufisant

gbinforme · Answer

bonjourCela voudrait dire que ton disque est saturé : as-tu fait le nettoyage ?

cyril · Answer

non c

cyril · Answer

non car ce n'est pa mon pc.

cyril · Answer

t'es sur que ca vient du disque dur car il me reste plus de la moitié de vide?

gbinforme · Answer

bonjourCette macro n'augmente la taille que de quelques caractères seulement,et donc ne peut pas saturer le disque, sauf erreur de boucle.Avant de rajouter le nom de cellule as-tu sauvé ton fichier ?

gbinforme · Answer

bonjourCette macro n'augmente la taille que de quelques caractères seulement,et donc ne peut pas saturer le disque, sauf erreur de boucle.Avant de rajouter le nom de cellule as-tu sauvé ton fichier ?

cyril · Answer

oui

gbinforme · Answer

bonjourest-ce que la cellule se met à jour ?

cyril · Answer

non

cyril · Answer

toujour l'erreur pile insuffisant

gbinforme · Answer

bonjourtu me dis :maintenant j'ai une autre erreur qui est : espace file insufisantpuis maintenant :toujour l'erreur pile insuffisantce qui n'est pas du tout pareilet avec des réponses laconiques c'est impossible de progresser,car en informatique la précision est de rigueur.

cyril · Answer

je sais ca arrive a tou le monde de se tromper

dd · Answer

Bonjour!J&#8217;ai 2 problèmes sur Excel et je voudrais bien de l'aide.Existe t-il une fonction qui puisse afficher 1 question automatiquement dès que l'on rentre un enregistrement?Existe t-il une fonction pour afficher dans 1 cellule la date de sauve garde du fichier?Merci de m'aider

gbinforme · Answer

bonjourExiste t-il une fonction pour afficher dans 1 cellule la date de sauve garde du fichier?tu regades la réponse 68 au-dessus.Existe t-il une fonction qui puisse afficher 1 question automatiquement dès que l'on rentre un enregistrement?tu peux avoir une vérification avec : menu outils/données/validationmais pour une question, il faut mettre une macro.si tu précise ta question (ligne, colonne,etc.), je te la proposerai

dd · Answer

j'ai regardé mais le problème c'est que j'ai une erreur sui me dit : pile insuffisantTu sais d'ou ca peut venir?

gbinforme · Answer

bonjourla réponse est ici chez le développeur :https://support.microsoft.com/en-us

Fredo · Answer

Je reviens sur une des première proposition de Gbinforme qui avait été faite et que je n'arrivais pas à reproduire concernant un tirage aléatoire de ligne avec copie des lignes tirées dans une autre feuille.

La précision que je souhaitais apporter est que votre première colonne doit etre composée de numéros tous différents.
ex : mettre en première colonne une numérotation de 1 à 50 (si vous avez 50 lignes)

Rappel de la macro concernée (et qui marche !!!) MERCI Gbinforme !

Sub sélection() 
Dim nbr_sel, nbr_elm, nbr_col, choix, pos, lig, i 
Dim inf_feu, inf_lig, inf_col 
Dim res_feu, res_lig, res_col 
nbr_sel = 100 ' le nombre de lignes à réviser 
nbr_col = 2 ' le nombre de colonnes à recopier 
inf_lig = 1 ' les données sont en ligne inf_lig 
inf_col = 1 ' les données sont en colonne inf_col 
inf_feu = "données" ' les données sont sur la feuille inf_feu 
res_lig = 1 ' le résultat est en ligne res_lig 
res_col = 1 ' le résultat est en colonne res_col 
res_feu = "resu" ' le résultat est sur la feuille res_feu 
' récupération du nombre de lignes de données 
nbr_elm = Worksheets(inf_feu).Cells(inf_lig, inf_col).End(xlDown).Rows 
' suppression précédente sélection 
Worksheets(res_feu).Cells(res_lig, res_col).CurrentRegion.ClearContents 

For lig = 0 To nbr_sel - 1 
Do 
choix = Int(Rnd(1) * nbr_elm) + 1 
For i = 0 To lig ' test doubles 
If Worksheets(res_feu).Cells(res_lig, res_col).Offset(i).Value _ 
= Worksheets(inf_feu).Cells(inf_lig, inf_col).Offset(choix - 1).Value _ 
Then 
Exit For 
End If 
Next i 
Loop Until Worksheets(res_feu).Cells(res_lig, res_col).Offset(i).Value = "" 

' copie des données sélectionnées 
Worksheets(res_feu).Cells(res_lig, res_col).Offset(lig).Formula = "=" & inf_feu & "!R" & choix & "C" 
Worksheets(res_feu).Cells(res_lig, res_col).Offset(lig).Resize(1, nbr_col).FillRight 

Next lig 
End Sub

gbinforme · Answer

bonjour

Rappel de la macro concernée (et qui marche !!!) MERCI Gbinforme !
merci, c'est sympa !

La précision que je souhaitais apporter est que votre première colonne doit etre composée de numéros tous différents.
ex : mettre en première colonne une numérotation de 1 à 50 (si vous avez 50 lignes)

comme la macro était destinée à la révision de mots anglais ils sont par nature tous différents. Si ce n'est pas le cas, il faut modifier le contrôle des doubles, en analysant l'ensemble de la ligne ou en décalant la colonne testée, selon la nature du fichier.

Koveras128 · Answer

Bonjour, j'ai parcourue la grande majorité de ce poste et essayé de trouver une solution a mon problème.  Mais j'ai pas réussie et j'apprécierais grandement votre aide :) 

Voilà , ce que je tente de faire c'est ceci : j'ai une liste de 30 mot (a5:a34) et j'aimerais avoir une deuxième colonne admettons en c (c5 a c30) ou l'ordre de c'est mot serait choisie aléatoirement 

Plusieurs Tirage au sort doivent être effectuer durant une année et aucun mot ne doit revenir deux fois.

En passant , je suis pris avec une version de excel anglaise :s 

Merci à l'avance :)

mizoul · Answer

Bonjour,

j'ai besoin d'adapter votre formule à ceci mais je n'y arrive pas et un message d'erreur apparait à chaque fois : "400"

J'ai une liste de 4000 mesures. Je voudrais faire un tirage aléatoire de 1000 valeurs parmi ces 4000 sans répétition.
Je pense que votre formule est la bonne mais pas moyens de l'adapter...

Seriez vous en mesure de me donner un coup de main ??

hiba · Answer

Bonjourn

Je cherche à créer aléatoirement une colonne contenant des letrres d'alphabet.

Merci de votre aide

LatelyGeek · Answer

Tu pourrais par exemple numéroter les mots, et faire une RECHERCHEV basée sur un nombre tiré au hasard grâce à la fonction ENT(ALEA()*ton nombre de mots +1)

Moi en tout cas, c'est comme ça que je ferais...

manupicho · Answer

Bonjour, 

j'espère que quelqu'un pourra m'aider...
 Le truc c que j'ai un fichier de 15 000 lignes et des bananes. J'ai besoin d'effectuer un tirage de 3000 lignes, recopiées dans une autre feuille, ou bien alors supprimer le 12 000 autres lignes de la feuille source.
J'ai bien essayer de bidouiller ce les prog que vous avez proposés, mais voila : Je ne comprends rien à VBA.

manupicho · Answer

oups... je termine... 
donc c'est pour un tirage aléatoire évidemment...
dans tous les cas merci bien!
++

Gwen · Answer

Cher Samy,

Je te remercie beaucoup pour cette feuille excel! je suis moi meme dans les langues, et apprendre le vocab fait partie de ma vie!! merci donc de me faciliter la tache! bonne continuation! @+ Gwen

pampam1983 · Answer

Bonjour Samy,

Je suis très intéressée par le programme de vocabulaire, et je suis sûr qu'il est parfait pour ce que je recherche. Par contre, impossible de le télécharger avec les liens sur le foum. Ca me mène à la page d'accueil de lycos. Est-ce que ce serait possible de me l'envoyer par email? ***@***

Merci beaucoup d'avance et bravo pour ce travail. J'ai essayé moi-même mais sans succès...

Fonction aléatoire sur excel

67 réponses

Discussions similaires