Discussion :

[Oxygn44]

Bonjour à tous,


Je voudrais savoir s'il est possible de coder une fonction particulière qui renvoie biensur un résultat dans une cellule (sur tout une colonne - 1300 lignes) mais aussi qui colore cette cellule en fonction de la valeur qu'elle a calculée?

J'ai essayé .colorindex dans ma function mais je pense que le fait que ce soit une fonction sur cette cellule, ça gèle les modifications. Est-ce possible? Pouvez-vous m'expliquer le principe?

J'ai donc essayé de passer par l'évènement worksheet_selectionchange(Target...). Mais le problème c'est qu'a chaque changement, il cherche à colorer les cellules et du coup bloque le calcul des valeurs dans ces cellules (ma fonction personnalisée).

Il ne me reste plus que la solution du bouton au dessus de la colonne à colorer et que le user clique à chaque fois. C'est pas top.

Auriez vous une idée pour que ce soit automatisé?
Autre question, pourquoi une function ne peut pas exécuter un changement de couleur? Est-ce ça le problème?

Merci pour toutes vos aides.
Je n'ai pas mis volontairement de code ici car il serait trop long je pense.
Pris à part, ils fonctionnent bien. C'est l'association function et colorisation qui ne va pas.

[alsimbad]

tu peux essayer comme ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Public b As Range
Function test(a, b)
test = a * 2
Range(b.Address).Interior.ColorIndex = 3
End Function
Sub je_teste()
Set plage = Range("a1")
plage.Value = test(4, plage)
End Sub

[wilfried_42]

Bonjour Osygn44, alsimbad

Quand tu modifies la valeur d'une cellule manuellement ou par macro, ça lance l'interruption : Worksheet_Change et non pas Worksheet_SelectionChange.

Donc ta Macro Modifie tes valeurs qui provoquent l'interruption citée qui elle même modifie les couleurs...

[Oxygn44]

Merci pour vos réponses.
Cette nuit j'ai trouvé la solution.
cependant, j'aimerais comprendre pourquoi une fonction ne peut pas faire interior.colorindex?
pourquoi ont-ils bloqués cette possibilité dans excel?
c'est vraiment dommage.

[AlainTech]

Une fonction, appelée dans la formule d'une cellule, ne peut modifier le contenu de la feuille.

[alsimbad]

cependant, j'aimerais comprendre pourquoi une fonction ne peut pas faire interior.colorindex?

es-ce que tu a réelement essayé la fonction que je t'ai envoyé?