Fonction alea avec une conditionnelle

Résolu
kawtdanne -  
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
j'ai réalisé une base excel, avec des numéros de dossiers et les noms des employés qui ont traités ces dossiers. quelle formule je dois utiliser pour avoir un numéro de dossier choisi au hasard à chaque fois que le nom de l'employer est par exemple julie?
merci

A voir également:

1 réponse

Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Bonjour

En supposant que les numéros de dossiers soient colonne A, les noms en colonne B, le nom de l'employée choisie en D1, utiliser la formule matricielle suivante :
=INDEX(A1:A1000;GRANDE.VALEUR(LIGNE(B1:B1000)*(B1:B1000=D1);ALEA.ENTRE.BORNES(1;NB.SI(B1:B1000;D1))))
à valider par Ctrl+Maj+Entrée pour obtenir au hasard, un des dossiers de cette employée.

Cordialement
Patrice
0
kawtdanne Messages postés 11 Date d'inscription   Statut Membre Dernière intervention  
 
Merci patrice,
Je viens seulement de voir ta réponse, j'ai finalement résolu le probleme autrement, j'ai trouvé sur internet un programme vba qui m'a permis de créer un formulaire ( avec une barre de défilement contenant les noms des personnes). Je choisi le nom que je veux et j'appuie sur le bouton de commande et un numéro de dossier correspondant au gestionnaire s'affiche.

le code utilisé est le suivant:

Private Sub CommandButton1_Click()
Dim MyValue As Integer
Randomize
re:
MyValue = Int(((Range("A65536").End(xlUp).Row) - 1) * Rnd) + 1
If CheckBox2.Value = False And gestionnaire <> Range("B" & MyValue).Value Then GoTo re
Hasard_Nom = Range("A" & MyValue).Value
MsgBox "Le fichier tirZ au sort est le : " & Hasard_Nom
'UserForm1.Hide
End Sub

Private Sub UserForm_Initialize()
gestionnaire.List = Array("a", "b","c")
CheckBox2.Value = True
End Sub
Private Sub CheckBox2_Click()
If CheckBox2.Value = True Then
gestionnaire = ""
End If
End Sub
Private Sub gestionnaire_Change()
If gestionnaire <> "" Then
CheckBox2.Value = False
End If
End Sub
0
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
La formule proposée fait la même chose si tu mets une liste de validation en D1
0