vba - ActiveX文本框值

如何在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

最佳答案

要获取标准文本框的值，请使用以下命令:ActiveDocument.Shapes(1).TextFrame.TextRange.Text

要获取 ActiveX控件(OLEobjects)的值，请使用以下语法，其中TextBox1是控件名称，请使用ActiveDocument.TextBox1.Value

要获取的名称，ActiveX控件，请使用以下命令:ActiveDocument.InlineShapes(1).OLEFormat.Object.Name