change a shape's text by vba

[drom]

Hi and Thanks in advance!

I have inserted a shapes as follows:
Insert\Shapes\basic shapes\ and I have inserted the "Bevel 1" shape.



I have added a text to this Shape, say eg: "HELLO"

how can I get or modify this text by vba?

Happy new year!

 

[VoG]

Try like this

Sub bevel()
ActiveSheet.Shapes("Bevel 1").TextFrame.Characters.Text = "Hello World!"
End Sub

 

[mjrofra]

Hi,

Maybe

Sheets("Sheet1").Shapes("Shape name").TextFrame.Characters.Text = "Hello"

EDIT: Sorry, did no see VoG response went I sent mine.

 

[drom]

Re: [Solved] change a shape's text by vba

Solved
Thanks to both!

 

[astrodon]

I realize many years and versions have passed since this post but, neither one of those work (Excel 365)

 

[Fluff]

Actually they both work.

 

[astrodon]

Actually they both work.

Tell that to my version.