Condition VBA And et Or

Bonjour,

Voici un code qui me sert à extraire des données d'un tableau en fonction de certains critère.

Pour le code en gras et le And j'ai envie de le changer en Or mais cela ne fonctionne pas dans le sens ou il n'isole pas sur ce critère. Existe t-il un solution ? Merci beaucoup

For i = 1 To UBound(tablo, 1)
        If tablo(i, 6) = ComboBox1 And tablo(i, 23) >= Val(TextBox1) _
                And tablo(i, 23) <= Val(TextBox2) And tablo(i, 2) = "OK" _

                [b]And tablo(i, 27) = "" And tablo(i, 27) <= Now[/b] And tablo(i, 35) = "" _  ici 
                Then
            ReDim Preserve tabloR(1 To 23, 1 To t + 1)
            For j = 1 To 23
                tabloR(j, 1 + t) = tablo(i, j + 10)
            Next j
            t = t + 1
        End If
    Next i

Finalement j'ai reussi a mettre un mot sur ma demande et j'ai trouvé la solution avec des parenthèses

Salut Alex !

Édit : Bon bah je poste quand même ma réponse, des fois que sa serve à ceux ou celles voulant des explications sur les If And Or ;D

Bien joué à toi ^^

Je ne comprend pas ta question, qu'est ce que tu cherche à avoir en modifiant tes AND par des OR ?

Sinon, petite explication du fonctionnement des AND // OR // (AND OR)

If a= 1 AND b = 1 Then [...]

Si a est égal à 1 ET QUE b est égal à 1 alors [...]

If a= 1 OR b = 1 Then [...]

Si a est égal à 1OU QUE b est à égal à 1 alors [...]

If a = 1 AND (b = 1 OR c = 1) Then [...]

Si a est égal à 1 ET QUE au moins b ou c est égal à 1 alors [...]

If a = 1 OR (b = 1 AND c = 1) Then [...]

Si a est égal à 1 OU QUE b ET c est égal à 1 alors [...]

En espérant que sa t'aide un peu

Je reste à dispo!

Rechercher des sujets similaires à "condition vba"