nom CommandButton

[meldja]

Bonjour,
Après une vaine recherche sur le Net, je m'en remets à vos connaissances expertes.
Je voudrais que mon commandbutton prenne le nom d'une cellule.
J'ai essayé les codes suivants au pif :
Private Sub CommandButton3_Click()
Caption = Range("C3").Value
puis
Private Sub CommandButton3_Click()
Caption.Name = Range("C3").Value

mais sans résultat.
Si c'est possible, merci de me donner le code.
Bonne journée

 

[job75]

Re : nom CommandButton

Bonjour meldja, le forum,

Tiré de l'aide VBA :

Syntaxe

object.Caption [= String]

Donc essayez :

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

A+

 

[meldja]

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

 

[job75]

Re : nom CommandButton

Re,

Je n'avais pas testé :

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

A+

 

[meldja]

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

 

[job75]

Re : nom CommandButton

Re,

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

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+