Change Control Toolbox Button Caption

O

Otto Moehrbach

Excel XP & Win XP

I have a Control Toolbox button, "CommandButton1" with a caption of, say,
"Old Caption".

I want to change the caption via VBA to, say, "New Caption".

How do I code that?

Thanks for your time. Otto
 
O

Otto Moehrbach

Per
Thanks for your response but I don't have a UserForm. The button is a
simple Control Toolbox button on the sheet. Otto
 
P

Peter T

Dim ole As OLEObject

On Error Resume Next
Set ole = ActiveSheet.OLEObjects("CommandButton1")
On Error GoTo 0

If Not ole Is Nothing Then
ole.Object.Caption = "New Caption"
Else
msgbox "no oleObject named CommandButton1 on activesheet"
End If

Regards,
Peter T
 
D

Dave Peterson

ActiveSheet.CommandButton1.Caption = "hi there"
'or
ActiveSheet.OLEObjects("commandbutton1").Object.Caption = "bye now"
 
O

Otto Moehrbach

Peter, Dave
Thanks. Works like a charm. Otto
Dave Peterson said:
ActiveSheet.CommandButton1.Caption = "hi there"
'or
ActiveSheet.OLEObjects("commandbutton1").Object.Caption = "bye now"
Click to expand...
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

How to enumerate buttons on user form 2
Command Button Question 8
Using a variable to select a CommandButton and setting the caption 4
Command button caption from cell value 4
Capture Forms button caption 5
Problem with ActiveX control 1
How can I programatically change the caption on a button? 3
Excel 2013 menubar incompatibility? 1

Top