在单词文本框中添加一个按钮

时间:2012-02-15 00:25:22

标签: vba ms-word office-2007

我想在word文档的文本框中添加一个按钮。 按钮应该像这样粘在文本框中:

----------------------------------------
word document content
text, text, a textbox follows

------------------[button1]-
|text box content          |
----------------------------

text, followed by another textbox

------------------[button1]-
|textbox2 content          |
----------------------------

more text

---------------------------------------

我已经能够使用vba添加一个按钮了,但我不知道如何使它坚持文本框,因为我可以有更多实例到带有按钮的文本框。

我想使用宏来做这件事,但也欢迎使用C#addin解决方案。

1 个答案:

答案 0 :(得分:1)

我担心无法将按钮叠加到您显示的文本框中,并使它们粘在一起。要覆盖它们,你需要将它们的布局包装样式设置为“与文本一致”之外的其他内容(例如“Square”)但是Word不会让你对它们进行分组(至少不是我的Word 2003)所以原则上它们可以相对移动。

但是,如果您创建一个按钮和一个文本框彼此相邻并保持包装样式“与文本一致”(默认情况下),那么它们将并排放置而不是相对于彼此移动(除非你在它们之间键入文本)。

Selection.InlineShapes.AddOLEControl ClassType:="Forms.CommandButton.1"
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.InlineShapes.AddOLEControl ClassType:="Forms.TextBox.1"

然后您可以在以下行中使用其他文本框按钮对。