If planning(cren, sess, expo) <> -1 & listeClef(planning(cren, sess, expo)) = listeClef(indi) Then 'si la case est attribue a un expose du meme mot clef
If MaValeur = 3 & MonTest = True Then
If MaValeur = 3 And MonTest = True Then
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionPublic Const LEXPO As Integer = 100 'nombre d'exposes dans la liste a repartir Public Const NCREN As Integer = 9 'nombre de creneaux dans l'evenement Public Const NSESS As Integer = 3 'nombre de sessions par creneau Public Const MAXEXPO As Integer = 4 'nombre max d'exposes par session Public listeClef(LEXPO) As String 'exposes dans la liste (indi). valeur au mot clef methodologique. Public planning(NCREN, NSESS, MAXEXPO) As Integer 'matrice des exposes dans le planning (creneau;session;expose). valeur à id, -1 si non alloué Public listeAttr(LEXPO) As Boolean 'liste des exposes attribues (Id). valeur true si l'expose a ete attribue.