我使用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文本框的答案。但据我所知，我插入的文本框不是这种类型的。
有人能帮忙吗？
3条答案
按热度按时间gmxoilav1#
这似乎是没有问题的工作：
7uzetpgm2#
我可以使用设置文本框内容
ia2d9nvy3#
您可以将文本放入单元格（可能是被文本框遮挡的单元格），并将文本框值设置为单元格的内容（=$B$7）。单元格的文本颜色也可以更改为白色以隐藏它。
缺点是它容易受到用户手动更改它的攻击。