Sommeprod compliquée LE RETOUR

Re bonjour!!!

Bon je sais que suis toute proche!! mais çà veut pas marcher.....;

J'ai essayé d'intégrer DANS la formule SOMMPRODUCT plage.interior.colorIndex<1 mais il doit y avoir un conflit d'écriture VBA......

Est ce que qq'1 peut m'aider je veux juste qu' excel ne me selectionne que les lignes qui n'ont pas de fond coloré dans la 1ère colonne du tableau pour faire le cumul de la colonne 39 ..... c'est juste une 8ieme condition.....mais de forme ...

je sais pas si je suis claire....

ma macro :
Range("A2").Select
Do While Not IsEmpty(ActiveCell)
If Not IsEmpty(ActiveCell) And ActiveCell.Interior.ColorIndex > 0 Then
ActiveCell.Offset(0, 51).Value = "=RC39"
Else
ActiveCell.Offset(0, 51).Value = "sumproduct((R2C3:R10000C3='Critères'!RC[-49])*(R2C4:R10000C4='Critères'!RC[-48])*(R2C5:R10000C5='Critères'!RC[-47])*(R2C6:R10000C6='Critères'!RC[-46])*(R2C7:R10000C7='Critères'!RC[-45])*(R2C8:R10000C8='Critères'!RC[-44])*(R2C9:R10000C9='Critères'!RC[-43])*(R2C39:R10000C39))"
End If
ActiveCell.Offset(1, 0).Select
Loop


MERCI BEAUCOUP

redrainette