Bonjour à tous,
oui c'est possible !
Bon allez je suis pas chien ... Aujourd'hui je suis vraiment de mauvaise humeur lol !!
Sub dede()
Dim Koa As Variant
For Each Koa In Selection
If Koa.Interior.ColorIndex = 6 Then
MsgBox ("JAUNE")
End If
Next
End Sub
++
Creepy