Bonjour
Pas très claire ta demande
Si c'est le fond du Label qui devient rouge
Private Sub Label1_Click()
Me.Label1.BackColor = RGB(255, 0, 0)
End Sub
Si c'est le fond de l'Userform qui devient rouge
Private Sub Label1_Click()
Me.BackColor = RGB(255, 0, 0)
End Sub