Bonjour a tous,

j'ai une macro qui fait une somme suivant la couleur de la case.
Le problème étant que je suis obligé de faire F9 pour actualiser mes sommes malgré que j'ai Application.Volatile dans mon code VBA.
Comment puis-je resoudre mon problème plz ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Function SOMMESICOULEUR(cellules As Range)
    Application.Volatile
 
    Dim total As Double
    Dim cellule As Range
 
    For Each cellule In cellules
        If cellule.Interior.Color = Application.Caller.Interior.Color Then
            total = total + cellule
        End If
    Next
 
    SOMMESICOULEUR = total
 
End Function
MErci pour votre aide