cocomyam
Messages postés6Date d'inscriptionlundi 12 février 2007StatutMembreDernière intervention12 septembre 2008
-
21 août 2008 à 02:59
cocomyam
Messages postés6Date d'inscriptionlundi 12 février 2007StatutMembreDernière intervention12 septembre 2008
-
21 août 2008 à 19:01
Bonjour,
Quelqu'un pourrai-t-il voir pourquoi ma fonction ne se réevalue pas automatiquement quand je change les parametres?
Function SomCool(Zone As Range, couleur As String)
Application.Volatile True
Select Case couleur
Case "rouge": couleur = 3
Case "vert": couleur = 50
Case "jaune": couleur = 6
Case "bleu": couleur = 5
Case "gris": couleur = 15
Case "orange": couleur = 40
End Select
For Each c In Zone If c.Interior.ColorIndex couleur Then cvSomme _
cvSomme + 1
Next
SomCool = cvSomme
End Function
En effet, quand je change la couleur de la cellule, la fonction ne se recalcul pas automatiquement.
Merci d'avance.
cocomyam
Messages postés6Date d'inscriptionlundi 12 février 2007StatutMembreDernière intervention12 septembre 2008 21 août 2008 à 19:01
salut,
en fait j'utilise la fonction normalement dans une cellule ( A5) qui va compter le nombre de cellule colorié sur une plage (A1:A4). Cependant le nombre de cellule colorié peut varier.