Discussion :

[eric4459]

Bonjour,
J'ai créé une macro dans laquelle j'utilise des conditions imbriquées pour comparer les valeurs de plusieurs cellules afin d'en renseigner une autre, voici le bout de code

Code :

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

1
2
3
If (data.Cells(i + 1, 9) <> "-" And data.Cells(i + 1, 7) <> data2.Cells(9, 7)) Or (data.Cells(i + 1, 9) <> "-" And data.Cells(i + 1, 7) <> data2.Cells(10, 7)) Then
      data.Cells(i + 1, 2) = "'" & data.Cells(i + 1, 2) & " of " & data.Cells(i + 1, 10) & " " & data.Cells(i + 1, 7) & " for " & data.Cells(i + 1, 9)
   End If

J'ai également testé celui-ci

Code :

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

1
2
3
 If (data.Cells(i + 1, 9) <> "-" And (data.Cells(i + 1, 7) <> "Procurement" Or data.Cells(i + 1, 7) <> "Construction") Then
                    data.Cells(i + 1, 2) = "'" & data.Cells(i + 1, 2) & " of " & data.Cells(i + 1, 10) & " " & data.Cells(i + 1, 7) & " for " & data.Cells(i + 1, 9)
   End If

Mon souci est qu'après avoir ajouté des AddWatch pour visualiser les valeurs de mes variables alors même que les valeurs " data.Cells(i + 1, 7) " et "data2.Cells(9, 7)" sont égales, la condition devient vrai et je rentre dans mon code .
Quelle erreur ai-je zappé? Ai-je utilisé la bonne méthode? Selon moi cela devrait fonctionner, je ne comprends pas . .
Merci pour votre aide

[78chris]

Bonjour

Quand on mélange des And et des Or, il est conseillé de mettre des parenthèses...

[eric4459]

Bonjour 78Chris,
Il me semble que le nombre de parenthèses était suffisant (voir le code) mais pour être sur j'en ai ajouté, résultat identique.

SI( ((A <> "_") ET ((B <> C) OU (B <>D))) me renvoie VRAI alors que B et C sont égaux.

Après vérification il est normal que ma condition soit vrai car ici si B = C j'aurai B <> D, ce qui validera ma condition .
Ce que je souhaite c'est que cette condition me renvoi FAUX si A <> "-" et si les valeurs C ou D sont présentes .

[Marc-L]

Bonjour, bonjour,

c'est comme en mathématiques, faut juste utiliser les parenthèses à bon escient, être logique quoi !

Si Condition1 ET (Condition2 OU Condition3) …

What else ?

__________________________________________________________________________________________

Merci de cliquer sur pour chaque message ayant aidé puis sur pour clore cette discussion …