Discussion :

[rocornet]

Bonjour,
J'ai une macro qui me permet de dispacher une liste de personne pour former des équipes de 4 personnes
Mien bien évidemment, cela me renvoie erreur lorsque le nombre de participant n'est pas égal à un multiple de 4.
Donc j'aimerais modifier cette macro pour créer au cas où, une équipes de 6 personnes ce qui réglerait pas mal le problème.
Merci d'avance

[Nako_lito]

dans ton code, tu mets un test sur le modulo 4, si la condition n'est pas remplie, tu sors de ton procédure.

Tu pourrais, dans ton if, mettre un test qui regarde si ton nombre de joueur -6 Modulo 4 <> 0 et ca, autant de fois que tu veux (retravailler le code aussi pour faire qqc de propre)

Autre chose, que se passe t'il si tu as un chiffre impair de joueur ?

tu pourrais faire qqc comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
if nbj mod 4 <> 0 then
   if (nbj - 5) mod 4 <> 0 then
      'faire 1 equipe de 5 et le reste en équipe de 4
      'goto SuiteTest
      if (nbj - 6) mod 4 <> 0 then
         ' faire une équipe de 6 et le reste en equipe de 4
         'goto SuiteTest
         if (nbj - 10) mod 4 <> 0 then
            'faire deux equipe de 5 et le reste en equipe de 4
            'goto SuiteTest
         end if
      end if
   end if
end if
 
SuiteTest: