oasis_ck
XLDnaute Nouveau
Bonjour le forum,
Je cherche une formule VBA pour compter dans une plage de cellule avec deux conditions :
Un exemple pour un résultat dans R7 :
Plage de cellule D4:O71
Condition1 : le mot "Practice"
Condition2 : Interior.Colorindex = 46 (Bronze)
Un autre exemple pour un résultat dans R14 :
Plage de cellule D4:071
Condition1 : le mot "Approche"
Condition2 : Interior.Colorindex = 16 (Argent)
Ect...
Pour info j'ai déja essayé avec une création de fonction "comptecouleur" qu'on retrouve sur le web, mais çà ralentit énormément à cause du calcul et çà buguait.
Je pensais à la fonction SUMPRODUCT dans worsheet.Activate mais je n'arrive pas à la créer (dans worksheet.Change cela fait une erreur d'espace pile) ou un code dans un module avec un OFFSET vu que la cellule à gauche de la cellule de résultat réunit les deux conditions.
Bref je me creuse la tête mais je m'enlise ^^
J'ai mis les résultats de l'exemple dans le fichier joint.
Cordialement
Je cherche une formule VBA pour compter dans une plage de cellule avec deux conditions :
Un exemple pour un résultat dans R7 :
Plage de cellule D4:O71
Condition1 : le mot "Practice"
Condition2 : Interior.Colorindex = 46 (Bronze)
Un autre exemple pour un résultat dans R14 :
Plage de cellule D4:071
Condition1 : le mot "Approche"
Condition2 : Interior.Colorindex = 16 (Argent)
Ect...
Pour info j'ai déja essayé avec une création de fonction "comptecouleur" qu'on retrouve sur le web, mais çà ralentit énormément à cause du calcul et çà buguait.
Je pensais à la fonction SUMPRODUCT dans worsheet.Activate mais je n'arrive pas à la créer (dans worksheet.Change cela fait une erreur d'espace pile) ou un code dans un module avec un OFFSET vu que la cellule à gauche de la cellule de résultat réunit les deux conditions.
Bref je me creuse la tête mais je m'enlise ^^
J'ai mis les résultats de l'exemple dans le fichier joint.
Cordialement