Microsoft 365 Faire une MFC avec pour condition la couleur d'une des cellules d'une plage.

[Frank Bellaisch]

Bonjour à tous
Je vous joins le fichier, ce sera plus clair. En colonne J, je veux tester si une des cellule de la plage C à H contient une cellule de couleur. Si oui, on met en vert, sinon on laisse vide. Mais il faut faire ça ligne à ligne. J'espère avoir été clair. Merci à tous pour votre aide

 

[Nain porte quoi]

Hello,

Le changement de couleur ne declanche aucune action, donc ça ne peut pas etre une MFC. À la rigueur une macro, mais ça risque d'être lourd car il faudra scanner toute la plage

 

[sylvanu]

Bonsoir Frank, NainPorteQuoi,
Un essai en PJ avec une fonction perso en VBA et une MFC.

Function CelluleEnCouleur(Plage As Range)
CelluleEnCouleur = ""
For Each C In Plage
    If Range(C.Address).Interior.Color <> 16777215 Then
        CelluleEnCouleur = ".": Exit Function
    End If
Next C
End Function