Change caption on label on worksheet

[tiredofit]

I have added a label onto my worksheet and would like to change the caption.

However, code like this does not work:

ActiveSheet.Shapes("Label1").Caption="Test"

or

ActiveSheet.Shapes("Forms.Label.1").Caption="Test"

Can someone please tell me what the correct syntax is ?

Thanks

 

[Trevor G]

Try this

Sub Macro1()

ActiveSheet.Shapes("Label 1").TextFrame.Characters.Text = "Changing the caption"
End Sub

 

[tiredofit]

Try this

I get a Run-time error.

The item with the specified name wasn't found.

 

[Trevor G]

What is the actual name of the object then, and is it an Active X label or is it a Form label?

 

[pgc01]

Hi

Mybe it's an activeX control?

ActiveSheet.Label1.Caption = "SSS"

 

[tiredofit]

Great, that works!