Calul cellules discontinues

Bonjour,

je souhaite faire la somme de cellules discontinues (cellules ligne 18 a ligne 143) dans l'exemple joint

j'ai utiliser la MFC et comme il est expliqué dans l'exercice du 31 mars dernier dans le chapitre calcul somme couleur excel j'ai utilsé la fonction =sommeSi Couleur() qui fonctionne avec la couleur du caractère.

j'aurai souhaité utiliser la couleur de fond et non pas la couleur de caractère.

j'ai remplacé dans la module VBA "Font" par "Interior" et ça ne marche pas.

dans le fichier joint le calcul s'effectue en fonction de la couleur du caractère avec un arrondi à l'entier

(voir ligne 145)et j'ai besoin des décimales

Pouvez-vous m'aider

par avance merci

petitlarousse

Bonjour

Modifies seulement cette ligne

Function SommeSiCouleur(Plage As Range, NumeroDeCouleur%) As Long

par celle ci

Function SommeSiCouleur(Plage As Range, NumeroDeCouleur%) As Double

Edit: Pour la couleur de fond, comme elle est mise par une MEFC c'est bien plus compliqué que seulement tester par Interior.ColoIndex

C'est déjà hors de mes compétences

Bonne nuit

Bonsoir,

merci pour la solution des décimales il reste à solutionner la MFC.

Mon objectif est de pourvoir additionner chaque année les amortissements sans être obligée de revenir sur chacune des lignes surtout qu'il y a environ 1000 lignes.

si quelqu'un à une idée

par avance merci

petit larousse

Bonsoir

A voir

Bonsoir

merci beaucoup pour la solution

et bonne nuit

petit larousse