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

Userform1.Commandbutton1.caption="New Caption"

Regards,
Per

"Otto Moehrbach" <(E-Mail Removed)> skrev i meddelelsen
news:(E-Mail Removed)...
> 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
>
>

Per
Thanks for your response but I don't have a UserForm. The button is a
simple Control Toolbox button on the sheet. Otto
"Per Jessen" <(E-Mail Removed)> wrote in message
news:uBSV6$(E-Mail Removed)...
>
>
> Userform1.Commandbutton1.caption="New Caption"
>
> Regards,
> Per
>
> "Otto Moehrbach" <(E-Mail Removed)> skrev i meddelelsen
> news:(E-Mail Removed)...
>> 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
>>
>>
>

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

"Otto Moehrbach" <(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
> 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
>
>

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



Otto Moehrbach wrote:
>
> 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

--

Dave Peterson

Peter, Dave
Thanks. Works like a charm. Otto
"Dave Peterson" <(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
> ActiveSheet.CommandButton1.Caption = "hi there"
> 'or
> ActiveSheet.OLEObjects("commandbutton1").Object.Caption = "bye now"
>
>
>
> Otto Moehrbach wrote:
>>
>> 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
>
> --
>
> Dave Peterson