我使用Excel 2007功能区上的“插入/文本框”菜单在工作表中插入了一个文本框。它已自动命名为“ TextBox 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"
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句