Dynamic macro button label

[Q45]

Is there a way to make the label of a macro button dynamic so that it is labeled as the results of a specific cell. (i.e., If I type the name of a person into a cell, can I have a macro button labeled as the same name as the contents of that cell, even if I change the name?

 

[dk]

Assuming your button is called CommandButton1 and the cell you want the caption to appear in is A1 try this:-

Right click the worksheet tab and choose View Code. Then try this:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Me.CommandButton1.Caption = Target.Value
End If
End Sub

HTH,
D

 

[Q45]

I've tried that every possible and I can't get it to work. Is there anything more specific I could be looking at?

 

[Russell Hauf]

dk is right on. Make sure that you have the code in the Worksheet object, and not in a module. Follow his instructions to the "T".

What does that mean, anyway, "To the T"? Anyone?

-Russell
This message was edited by Russell Hauf on 2002-02-19 16:21

 

[Jack in the UK]

Follow his instructions to the "T".
What does that mean, anyway, "To the T"? Anyone?
`````````````
old latin convertion for"letter" but cant remember the T word now... latin has all but dided out now bar doctors and legal peoples

Rdgs
Jack

 

[Chris Davison]

Jack ! how about "formulae" we still use Latin although lots of people say "formulas"

:wink:

 

[Cosmos75]

Am curious, can a macro be assigned to that button BUT the macro assigned depends on the name currently on the button? If possible, would the button name and macro have to be the same? Just curious.

THANKS!

 

[Jay Petrulis]

On 2002-04-10 13:49, Cosmos75 wrote:
Am curious, can a macro be assigned to that button BUT the macro assigned depends on the name currently on the button? If possible, would the button name and macro have to be the same? Just curious.

THANKS!

Hi,

It can be done, but the trigger mechanism to change the caption would/should also trigger the procedure to run, like the following pseudo code.

If range1 >10 then
button.caption = "Forget this"
Call "forget_this_macro"
Else if ....

would be the most frequent route. You could test the caption, as you wish to do:

If button.caption = "Run Me" then
"Run_Me"
Else
"Run_something_else"
End if

It just seems backward to me.

HTH,
Jay