Tirage au sort aléatoire avec une condition

Skali -  
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,


je veux créer un code VBA qui permet de tirer aléatoirement les employés qui travaillent le samedi mais je veux prendre seulement 7 personnes
dans le tableau des employés , il y a aussi des personnes qui ne travaillent pas le samedi

2 réponses

yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 584
 
bonjour,
qu'as-tu essayé?
0
Skali
 
Bonjour,

j'ai essayé les fonctions d'Excel alea et range et j'ai écrit un code mais je ne sais pas comment coder ma contrainte :
Sub tirage()

Dim Nom As String
Dim Prénom As String
Dim S1 As Variant
tirage As Variant

Nom = Range("B3")
prenom = Range("C3")
S1 = Range("D3")
tirage = Range("H3")
Randomize
Select Nom if Nom = "W"



End Sub
0
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
Bonjour

Une proposition
https://www.cjoint.com/c/LDjj426oI3B

Cdlmnt
0