如何在Excel中使用VBA将文本插入（工作表）文本框？

我使用Excel 2007功能区中的“插入/文本框”菜单在工作表中插入了一个文本框。它已自动命名为“文本框17”。 我试图使用VBA代码设置它的值，但我想不出方法。我甚至试着运行一个单行例程，只为文本框输入一些文本（如下面的和其他组合），但失败了

Sub test()
    Sheets(1).Shapes.item(14).Text = "eventually some text"
    Sheets(1).Shapes(14).Text = "eventually some text"
    Worksheets(1).Shapes(14).Value = "eventually some text"
    Sheets(1).Shapes("TextBox 17").Text = "eventually some text"
    Sheets(1).Shapes("TextBox 17").ControlFormat.Value = "eventually some text"
    Worksheets(1).Shapes(14).TextFrame.TextRange.Text = "eventually some text"
End Sub

在这方面的研究中，我只找到了关于activeX文本框的答案。但据我所知，我插入的文本框不是这种类型的

---

有人能帮忙吗？

这似乎没问题：

Sheets(1).Shapes(14).TextFrame.Characters.Text = "xxx"

---

我可以设置文本框的内容

Sub test()
    Sheets(1).Shapes.Item(14).TextFrame.Characters.Text = "eventually some text"
End Sub

---

对象不支持此方法或属性错误，知道吗？