Test qui ne marche pas en VBA

Question

Avec l'aide de mr ferrand j'ai obtenu un code qui me permet de faire des test et d'extraire des données d'un tableau. Je me suis amusé à mettre plus de critère pour fichier d'origine. Malheureusement le premier test ne marche pas : If tablo(i, 18) &lt; tablo(i, 19) Voici la phase de test en entier : If tablo(i, 18) &lt; tablo(i, 19) And (tablo(i, 12) = "légumes" Or tablo(i, 12) = "fruit") Or tablo(i, 12) = "patate" Or tablo(i, 12) = "crevette" And (tablo(i, 11) = "vache" Or tablo(i, 11) = "oiseau") Or tablo(i, 11) = "banane" Or tablo(i, 11) = "rien" Or tablo(i, 11) = "pastèque" Then Si quelqu'un à une idée de pourquoi le premier test ne ce met pas en route. Merci d'avance, Lultras...

MFerrand · Answer

Si je lis bien : (T=test) Si T1 ET (T2 OU T3) OU T4 OU T5 ET (T6 OU T7) OU T8 OU T9 OU T10 Soit Si T1 ET (T2 OU T3) T4 T5 ET (T6 OU T7) T8 T9 T10 Les 6 lignes listées ci-dessus sont reliées par OU : si l'une d'elles renvoie VRAI, l'ensemble de l'expression renverra VRAI. Les lignes composées avec ET impliquent que le premier membre soit VRAI et que l'un ou l'autre des 2e ou 3e membres soit VRAI, pour renvoyer VRAI. Cordialement...