は、テキストボックスエクセルVBAへ

Question

をテキストを追加し、私は次の方法使用して、テキストボックスにテキストを追加することができます

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

しかし形状を選択する貧しい練習のように思えます。

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

どのようにこれが達成可能である：私はのようなものを使用したいのですが？

Answer 1

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