problème de condition

Bonjour à tous,

Encore un petit problème que je n'arrive pas à résoudre malgré sa simplicité :oops:

voici les deux conditions qu'excel igniore

Code:

---

If Application.WorksheetFunction.Sum(Range("G6:zz6")) = "" And Range("D6") <> "" Then

---

Si à partir de g6 la ligne 5 est vide et que d6 est différent de rien alors.... Mais ça ne fonctionne pas:?
merci pour votre aide

cordialement Dider

Bonjour

Code:

---

Application.WorksheetFunction.Sum(Range("G6:zz6")) = ""

---

est incorrect; il faudrait mettre

Code:

---

Application.WorksheetFunction.Sum(Range("G6:zz6")) = 0

---

puisque "Sum" renvoie une valeur numérique. Ceci ne signifie pas que la plage est vide, mais qu'il n'y a pas de valeur numérique non nulle. Mets :

Code:

---

If Application.CountA(Range("G6:zz6")) = 0 And Range("D6") <> "" Then

---

Encore merci Daniel
je viens juste de m’apercevoir de ma bêtise car avec une formule c'est identique il faut mettre 0 au lieu de "" avec une somme
j'aurais du trouver ça tout seul :oops:
Cordialement
Didier