设置内容控件标题

Question

我在使用 VBS 设置内容控制值时遇到问题。这是我正在做的事情：

Sub saveToWord
    Set docObj = CreateObject("Word.Application")
    docObj.visible =true
    docObj.Documents.open "C:\Users\User\Desktop\test.docx"
    docObj.SelectContentControlsByTitle("Title").Item(1).Range.Text = "Test title"
End Sub

它在 VBA 中完美运行，但不适用于 VBScript。出现错误：

Object doesn't support this property or method: 'docObj.SelectContentControlsByTitle'

是否有任何替代方法可以实现此目的？我查看了 ContentControls Object Docu，但找不到任何合适的方法。

Answer 1

问题是您将 Word.Application 分配给了变量 docObject。 SelectContentControlsByTitle 是 DOCUMENT 的成员，而不是 Application 对象。你需要更多类似

的东西

 Set wdApp = CreateObject("Word.Application")
 wdApp.Visible = true
 Set docObject = Documents.Open(fileName)
 'Etc.

设置内容控件标题

Setting content control title

vbscript

ms-word

word-contentcontrol