How do I refer to a text box on an embedded chart

[Ziggy12]

Why doesn't this work?

Sub test()
Worksheets("Last 30 Days Dashboard").ChartObjects("Chart 26").Activate
ActiveChart.Shapes("TextBox 11").Text = "X1"

End Sub

The first line works
The second returns a object does not support the property or method error.
Mybe I have to select the text box first but then once selected how do I change the txt?

ziggy

 

[JoeMo]

Something like this:

Sub ChrtTest()
Dim tBx As Shape
With ActiveSheet
    Set tBx = .ChartObjects("Chart 26").Chart.Shapes("Textbox 11")
End With
tBx.Select
Selection.Text = "Your text here"
End Sub

 

[Ziggy12]

That works.

Little bit yoda but.

cheers
ziggy