Discussion :

[jackborogar]

Bonjour

Voici ci dessous mon code, cependant il ne prend pas en compte les conditions du IF et effectue donc le calcul. Pourquoi?

Code :

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

1
2
3
4
5
6
7
8
If Sheets("Achat 2012-2013").Range("C" & i - 5).Value <> "ALOST FARIN HORS ICK ET NESLE EQUIVALENT BLE" Or Sheets("Achat 2012-2013").Range("C" & i - 5).Value <> "ICKLINGHAM BLE" Then
 
 
            strFormule5 = strFormule5 & "+" & "SOMMEPROD('Achat 2012-2013'!D" & i + 13 & ";'Achat 2012-2013'!K" & i + 13 & ")"
            strFormule6 = strFormule6 & ";'Achat 2012-2013'!D" & i + 13
 
 
       End If

Cdt

[Daranc]

essayes de mettre ta condition entre parenthèses

Code :

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

IF (condition1 OR condition2) Then

oups!
dans tes condition tu marques
si cellule( a1) est différent de A
ou
si cellule( a1) est différent de B
tu auras toujours vrai puisque ta cellule est forcément différente de l'une ou de l'autre voir des deux conditions

[jackborogar]

Non du tout justement les 3/4 du temps elle est différente soit de l'une ou de l'autre condition mais il y a deux cas où ma cellule (c & i-5) est égale à une de mes deux conditions et je ne veux pas que sa s'exécute

[Daranc]

oui si elle est différente de A alors le calcul se fait mais
ou si elle est différent de B alors le calcul se fait
soit tu veux le calcul si elle est différente de A soit si elle est diférente de B soit si elle est différent de A et de B
voir l'exemple feuille ci dessous la formule identique a celle de VBA retourne toujours vrai

Code :

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

1
2
3
4
5
6
7
8
9
10
        = SI(OU(B29<>"A";B29<>"B");1;0)
A	1
B	1
A	1
A	1
B	1
C	1
B	1
C	1
A	1

pour que ça ne s'execute pas
c'est

Code :

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

1
2
3
4
If condition1= A ou condition2 =b then
else
ton calcul
End If

[jackborogar]

Parfait merci beaucoup