Bonjour
J'ai un code qui me permet de compter les cellules d'une couleur X.
Lorsque je change la couleur d'une cellule. tout est beau le calcul s'effectue.
Lorsque j'ouvre le fichier d'un autre ordi. il n'y a aucun calcul qui s'effectue :/
J'ai l'impression que le code ne "roule" pas.
Function CountCcolor(range_data As Range, criteria As Range) As Long
Dim datax As Range
Dim xcolor As Long
xcolor = criteria.Interior.ColorIndex
For Each datax In range_data
If datax.Interior.ColorIndex = xcolor Then
CountCcolor = CountCcolor + 1
End If
Next datax
End Function
J'ai inscrit ce code dans un module. Est-ce au bon endroit?
Voici le contenu d'une cellule dans Excel : =CountCcolor($B$2:$B$3, C6)
Merci,