VBS写入打开文件

Question

我有一个word文档，用户可以输入数据。我有一个按钮，将运行VB来收集信息。我无法让VB在文档打开时将脚本输出写入文档。 VBS可以写入打开/活动的word文档吗？对不起，如果这看起来很基本......对VB新手。

Answer 1

您可以使用 getObject 方法设置对已打开的Word文档的引用，如下面的代码所示：

Dim word, docs, docName, reqdDoc
Set word = getObject(,"word.application")
Set docs = word.documents
docName = "Document1"                    'Enter the name of the document in which you want to write the data
'MsgBox docs.count
For Each doc In docs
    If StrComp(doc.fullName,docName,1)=0 Then
        Set reqdDoc = doc
        Exit For
    End If
Next
reqdDoc.Activate
word.selection.typeText "Hello There:"