ActiveX文本框值

Question

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

我在word中认为这将是正确的语法
     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的耐心;）。