Actualisation automatique somme par couleur

[fabs_64]

Salut !
Bien que les posts concernant les sommes selon la couleur de fond de la cellule sont nombreux, je n'en ai pas trouvé de satisfaisant pour mon probleme.

En effet, j'ai une fonction VBA me permettant de sommer en fonction de la couleur de fonc d'une cellule de référence.
Cependant, lorsque je colore de nouvelles cellules, la mise à jour de la somme n'est pas automatique.

Auriez-vous une idée pour rendre cette actualisation automatique ?

Merci !

 

[Guest]

Re : Actualisation automatique somme par couleur

Bonjour Fabs,


ajouter Application.Volatile en haut de la fonction, comme ceci:

Function SumByColor(PlageEntree As Range, CouleurPlage As Range) As Double    
   Dim Cell As Range, TempSum As Double, ColorIndex As Integer
   Application.Volatile
 
.....reste du code
 
End Function

La fonction sera recalculée à chaque calcul de la feuille.
A ma connaissance il n'y a pas moyen d'intercepter un évènement de changement de couleur de cellule pour relancer le calcul de la fonction.

A+

 

[fabs_64]

Re : Actualisation automatique somme par couleur

J'ai mis dans le code "Application.Volatile" mais la fonction ne se remet pas à jour lorsque l'on change la couleur

Pas de possibilité d'intercepter un éventuel changement de couleur ?