shapes textbox name..

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

ActiveChart.Shapes.AddTextbox(msoTextOrientationHorizontal, 31.5, 8.5, _
122.75, 42#).Select
generate a automatic name "Text box X" x= number auto number
How to get name on textbox or set name in shapes at chart
 
Hi,

If you assign the shape to an object then you can retrieve and set
properties.

'---------------
Sub x()
Dim shpTemp As Shape

Set shpTemp =
ActiveChart.Shapes.AddTextbox(msoTextOrientationHorizontal, _
31.5, 8.5, 122.75, 42#)
shpTemp.TextFrame.Characters.Text = shpTemp.Name

End Sub
'-----------------
 
Back
Top