ActiveX文本框值

Question

如何在Word中获取文本框的值？我知道在excel中这是正确的语法:ActiveSheet.Shapes(x).Name.

我认为在这个词,这将是正确的语法
ActiveDocument.Shapes(x).Name,
但是这似乎并不工作.

使用这段代码我也找不到文本框:

For i = 1 To ActiveDocument.Shapes.Count
    MsgBox ActiveDocument.Shapes(i).Name
Next i

Answer 1

1. 要获得价值一的标准的文本框,使用此: ActiveDocument.Shapes(1).TextFrame.TextRange.Text

2. 要获取价值的ActiveX控件(OLEobjects) ,使用此语法,其中TextBox1为控制名称,使用 ActiveDocument.TextBox1.Value

3. 要获取名称的ActiveX控件,使用此: ActiveDocument.InlineShapes(1).OLEFormat.Object.Name

Answer 2

我使用标签（对象属性 -> 分配标签名称）来编辑对象的值。使用此语法更改内容控件的值： ActiveDocument.SelectContentControlsByTag("Your-Content-Control-Tag").Item(1).Range.Text = "your-preferred-value" 无论如何，感谢 Rachel Hettinger 的耐心等待；）。