vba - 如何在 Excel 中使用 VBA 将文本插入(工作表)文本框？

Question

我在工作表中插入了一个文本框，使用 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 文本框的答案。但据我了解，我插入的文本框不是这种类型的。

有人可以帮忙吗？

Answer 1

这似乎没有问题:

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