nom CommandButton

job75

XLDnaute Barbatruc

• 20 Novembre 2008

• #2

Re : nom CommandButton

Bonjour meldja, le forum,

Tiré de l'aide VBA :

Syntaxe

object.Caption [= String]

Cliquez pour agrandir...

Donc essayez :

Code:

Private Sub CommandButton3_Click()
CommandButton3.Caption = Range("C3").Value

A+

 

Vote positif 0 Vote négatif

M

meldja

XLDnaute Impliqué

• 20 Novembre 2008

• #3

Re : nom CommandButton

Merci pour ton aide.
Entre temps j'avais déjà essayé ce code mais ça ne marche pas.
J'ai quand même réessayé en vain.
Si tu as une autre idée à tester, je suis preneur.
Encore merci

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 20 Novembre 2008

• #4

Re : nom CommandButton

Re,

Je n'avais pas testé :

Code:

Private Sub CommandButton3_Click()
CommandButton3.Caption = [COLOR="Red"]ActiveSheet[/COLOR].Range("C3").Value

A+

 

Dernière édition: 20 Novembre 2008

Vote positif 0 Vote négatif

M

meldja

XLDnaute Impliqué

• 20 Novembre 2008

• #5

Re : nom CommandButton

Ok, merci, c'est réglé.

Petit détail, la cellule C3 change de valeur (il y a une liste déroulante) et le bouton ne prend la valeur de cette cellule que si je clique dessus.
Je vais avoir si je peux arranger ça avec Worksheet_Change.

Merci et bonne journée

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 20 Novembre 2008

• #6

Re : nom CommandButton

Re,

meldja à dit:

...et le bouton ne prend la valeur de cette cellule que si je clique dessus.

Cliquez pour agrandir...

Evidemment puisque que c'est le clic sur le bouton qui déclanche la macro...

Une Worksheet_Change en effet modifiera le bouton à chaque changement de la cellule.

A+

 

Vote positif 0 Vote négatif