Discussion :

[steph_1]

Bonjour,

J'ai ce code :

With XlSheet.Range("D1")
.FormatConditions.Add Type:=2, _
Formula1:="=NB.SI(D6" & nRow & ";""in progress"")"
.FormatConditions(1).Interior.ColorIndex = 33
End With

Sur toute la colonne D, je compte le nb de fois où il y a le texte "in progress".
Si > 0, je colorie la cellule D1.

Je voudrais aussi stocker ce résultat dans la cellule D1.

Comment récupérer le résultat de NB.SI ?

[rjamin]

Bonjour,
Et en pemplaçant

Code :

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

"=NB.SI(D6" & nRow & ";""in progress"")"

par

Code :

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

"=Nb.SI($D$6:$D$" & nRow & ";""in progress"")"

[steph_1]

J'ai résolu le pb, tout simplement:

XlSheet.Range("D1").Select
XlSheet.Range("D1") = "=NB.SI(D6" & nRow & ",""in progress"")"

J'ai enlevé mon With...End With.

Par contre cela marche avec ',' et non ';' dans la formule du NB.SI.