Add text to a text box Excel VBA

Question

I can add text to a textbox using the following method:

ActiveSheet.Shapes.Range(Array("TextBox 6")).Select
Selection.Text = "a"

However selecting the shape seems like poor practice. I'd like to use something like:

Worksheets("Dashboard").Shapes("Textbox 6").Text = "a"

How is this achievable?

cyboashu · Accepted Answer · 2016-07-20 13:58:12Z

4

Use the TextFrame property

ActiveSheet.Shapes("Textbox 6").TextFrame.Characters.Text = "Hello"

answered Jul 20, 2016 at 13:58

cyboashu

10.5k2 gold badges32 silver badges48 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

Perfect, Thank you.