Couleur CommandButton

thomasly@neuf.fr · 10 Septembre 2010

Bonsoir,

J'ai un petit problème :

Dans une feuille, j'ai un bouton nommé CommandButton1 affecté d'une couleur de fond ( ex rouge ).

Après sélection d'une plage de cellules et clic sur le bouton, j'aimerai que la zone soit affectée de la même couleur que celle de CommandButton1.

Pouvez-vous m'aider SVP

Merci de vos réponse

Robert · 10 Septembre 2010

Re : Couleur CommandButton

Bonsoir Thomas, bonsoir le forum,

Essaie comme ça :

Code:

Private Sub CommandButton1_Click()
Selection.Interior.Color = Me.CommandButton1.BackColor
End Sub

fhoest · 10 Septembre 2010

Re : Couleur CommandButton

Bonsoir
a l'aide de quel bouton de commande veux tu faire ceci,
controlbutton sur feuille ou bouton activex ou bouton sur userform
Merci (sinon un debut suite a un enregistrement de macro)

Code:

Sub couleur()
'
' couleur Macro
'

'
    Range("B2:F7").Select
    With Selection.Interior
        
        .Color = 255 'remplacer 255 par commandbutton1.backcolor
        
    End With
End Sub
Sub Bouton1_Clic()
Call couleur
End Sub

A+
Edit: bonjour Robert

thomasly@neuf.fr · 10 Septembre 2010

Re : Couleur CommandButton

Merci

C'est parfait

Couleur CommandButton

thomasly@neuf.fr

Guest

Robert

XLDnaute Barbatruc

fhoest

XLDnaute Accro

thomasly@neuf.fr

Guest

Discussions similaires

Couleur CommandButton

thomasly@neuf.fr

Guest

Robert

XLDnaute Barbatruc

fhoest

XLDnaute Accro

thomasly@neuf.fr

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency