bonjour
je travaille avec excel 2010.
j'ai copié la macro suivante sur un ordinateur :
Function SommeCouleurFondRef(champ As Range, couleurFond As Range)
Application.Volatile
Dim c, temp
temp = 0
For Each c In champ
If c.Interior.ColorIndex = couleurFond.Interior.ColorIndex Then
If IsNumeric(c.Value) Then temp = temp + c.Value
End If
Next c
SommeCouleurFondRef = temp
End Function
elle me permet de faire la somme des cellules qui ont la même couleur que des cellules de références de la même couleur.
j'ai enregistré le fichier, et ça marchait bien.
j'ai envoyé le fichier à un ami pour qu'il valide le fichier. pb, sur son ordi, ça marche pas (il utilise comme moi excel 2010).
la macro apparaît bien dans le module des macros, pas de pb de ce côté-là.
j'ai essayé de retaper la formule dans les cellules où je veux que mes sommes apparaissent =sommecouleurfondref(G1/G1000;F1), mais c'est pareil, le résultat me met "NOM?". visivlement il ne reconnaît pas le nom "sommecouleurfondref", alors que je n'ai rien touché...
qq'un peut-il m'aider
merci
poc
je travaille avec excel 2010.
j'ai copié la macro suivante sur un ordinateur :
Function SommeCouleurFondRef(champ As Range, couleurFond As Range)
Application.Volatile
Dim c, temp
temp = 0
For Each c In champ
If c.Interior.ColorIndex = couleurFond.Interior.ColorIndex Then
If IsNumeric(c.Value) Then temp = temp + c.Value
End If
Next c
SommeCouleurFondRef = temp
End Function
elle me permet de faire la somme des cellules qui ont la même couleur que des cellules de références de la même couleur.
j'ai enregistré le fichier, et ça marchait bien.
j'ai envoyé le fichier à un ami pour qu'il valide le fichier. pb, sur son ordi, ça marche pas (il utilise comme moi excel 2010).
la macro apparaît bien dans le module des macros, pas de pb de ce côté-là.
j'ai essayé de retaper la formule dans les cellules où je veux que mes sommes apparaissent =sommecouleurfondref(G1/G1000;F1), mais c'est pareil, le résultat me met "NOM?". visivlement il ne reconnaît pas le nom "sommecouleurfondref", alors que je n'ai rien touché...
qq'un peut-il m'aider
merci
poc