Bonjour,

Je voudrais coder sur VBA cette formule :

Si(ET(Q2="";OU(H2="001121";H2="002160"; H2="001170");ABS(R2<15000);"PAS DE DECOMPTE";"DECOMPTE A EMETTRE")).

Voici mon codage mais ça ne fonctionne pas :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 If .Cells(j, "Q") = "" And somme < 15000 Or .Cells(j, "H").Value = "002160" Or .Cells(j, "H").Value = "001170" Or .Cells(j, "H").Value = "001121" Then 
.Cells(j, "M") = "PAS DE DECOMPTE" Else .Cells(j, "M") = "DECOMPTE A EMETTRE"
 
End If
Pouvez vous me corrigé sur mon codage svp.

Merci