[XL-365] Err 1004 dans une fonction avec Displayformat

Bonjour,

J'essaie depuis plusieurs heures de comprendre pourquoi ma fonction ne fonctionne pas, sans trouver réponse :aie:

Dans un fichier EXCEL de base, j'essaie de créer une fonction (dans un module) qui me retournera une valeur booléenne si la couleur de la cellule est restée "sans couleur" (colorindex=-4142) à la suite d'une MFC.

La fonction est la suivante :
Code:

1 2 3 4 5 Function EST_SANS_FOND(Target As Range) As Boolean If Target.DisplayFormat.Interior.ColorIndex = -4142 Then EST_SANS_FOND = True End Function
Le fichier est tel que :
Pièce jointe 590079

Rien de compliquer. La MFC en $C$5 est =VRAI alors remplissage d'une couleur bleue (colorindex=20)
La formule en $C$7 est =EST_SANS_FOND($C$5).

Pourquoi obtiens-je une erreur 1004 ?
Le plus fou c'est que dans la fenêtre d'exécution dans l'éditeur VBA, si je rentre

Code:

?Target.DisplayFormat.Interior.ColorIndex

j'obtiens la bon code couleur.

Je ne comprends pas pourquoi il y a une erreur 1004 dans la fonction ?! :weird:

Si quelqu'un en connaît la raison je suis tout ouïe :roll:

Merci au fofo