problème avec une condition

[dmoluc]

Bonjour à tous,
je bute encore sur un truck qui doit être simple
lorsque c'est deux conditions sont vraies, rien ne se passe et ma macro n'est pas exécutée

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

je voudrais exécuter mon code que si la ligne 6 est vide à partir de g6 et que la ligne 7 comporte des données
le problème vient de la somme, alors comment faire ?
Merci pour votre aide


cordialement Didier

 

[Bebere]

Re : problème avec une condition

bonjour dmoluc
tu peux aussi employer Application.WorksheetFunction.CountA(Range("G6:zz6")) ou Application.WorksheetFunction.Countif(Range("G6:zz6"),"<>" & "")

If Application.WorksheetFunction.Sum(Range("G6:zz6")) =0 And Application.WorksheetFunction.Sum(Range("G7:zz7"))>0 Then

 

[dmoluc]

Re : problème avec une condition

Merci pour ton aide mais décidément je suis vraiment stupide car la syntaxe est la même qu'avec une formule que j'utilise d’ailleurs très souvent
Encore Merci
cordialement