Bonjour,
pour avoir l'info Color (type Long),
Private Sub Label1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
celcolor = Me.Label1.BackColor
Me.TextBox1.BackColor = celcolor
Me.TextBox2 = celcolor
End Sub
ColorIndex est une propriété de l'Objet Interior
l'Objet Interior représente l'intérieur d'un objet Range.
il y aurait la possibilité d'appliquer la propriété Color à un Range et puis de vérifier si cela correspond à un des 56 possibilitées de Interior.ColorIndex.
il y a aussi la possibilité de transformer le type Long en valeur RGB