msgbox suivant la couleur de fond d'une cellule

Bonjour à tous !
Je voudrais mettre en place cette procédure :


Dim ws As Worksheet
Dim cell As range

For Each ws In Worksheets

cell("M126").Select

If cell.Interior.ColorIndex = 45 Then
MsgBox ("Alerte orange sur fiche de ...")
ElseIf cell.Interior.ColorIndex = 3 Then
MsgBox ("Alerte rouge sur fiche de ...")
ElseIf cell.Interior.ColorIndex = 30 Then
MsgBox ("Alerte marron sur fiche de ...")

End If

Next

J'explique : la cellule M126 est en mise en forme conditionnelle, et je voudrais que suivant la couleur de fond de cette cellule, le message change.
Voila ce que j'ai tenté de faire sans succès.

Merci à tous !!