Salut KTM,
un contrôle ne pourra "retrouver" sa couleur qui si tu l'utilises dans une Userform. Utilisé directement sur la feuille, il prendra la couleur désirée lorsque tu le survoleras avec la souris mais gardera cette couleur car une feuille n'a pas la propriété 'MouseMove'.
Pour un bouton 'cmdOK' dans une Userform :
Private Sub cmdOK_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
'
If cmdOK.BackColor <> RGB(255, 0, 0) Then cmdOK.BackColor = RGB(255, 0, 0)
'
End Sub
Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
'
If cmdOK.BackColor <> RGB(215, 215, 215) Then cmdOK.BackColor = RGB(215, 215, 215)
'
End Sub
A+