Bonsoir Dossantos, bonsoir le forum,
Le problème est que la mise en forme ne déclenche aucun événement... Par conséquent, on ne pourra pas déceler le changement de couleur d'une cellule directement, ça ne marchera pas. En revanche, si tu modifies la couleur puis sélectionne n'importe quelle autre cellule, le code ci-dessous va fonctionner :
Par exemple, tu changes la couleur en A1, puis sélectionne A2 :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("A1").Interior.ColorIndex = 6 Then Range("B1").Value = "A1 est jaune" Else Range("B1").Value = ""
End Sub
Mais il faudra, à chaque fois, sélectionner une autre cellule...