SI SansEspace(ValDifficultes) <> "" ALORS
ValDifficultes = CorrigeDifficultes(ValDifficultes)
tblVar = Split( ValDifficultes, ",", Vrai )
AjouteCondition(sCondition, " AND [Difficultes] = '" + ValDifficultes..Valeur + "' ")
//On ajoute les conditions à partir du tableau dynamique
POUR Ind = 1 A Dimension( tblVar)
AjouteCondition( sCondition , RC + " [Difficultes] LIKE '%" + WL.Phonétique(tblVar[Ind]) + "%' ")
FIN
SI SansEspace(ValSuivi) <> "" ALORS
AjouteCondition( sCondition," [Suivi] = '" + ValSuivi..Valeur + "' " )
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=17&topic_id=5474&post_id=22657