Question

请有人帮我解决这个问题的语法。我想将一个现有文档分配给一个我可以打开并稍后激活的变量。运行代码时可能会打开多个文档（包括包含vba项目的文档），所以我需要确保我正在激活正确的文档。以下不起作用，因为我需要文件名而不是最后一行的文件路径，但我不知道如何从第2行的路径中提取这个...

Dim NewQuote1 as string Set NewQuote1 ="C:\Library\doc1.docx" Documents.Open fileName:=NewQuote1 ... Documents(NewQuote1).Activate

Answer 1

我没有使用我的Word VBA，但我非常确定它与Excel非常相似。

所以：

Sub Test()

    Dim wrdDoc As Document
    Dim NewQuote1 As String

    NewQuote1 = "C:\Library\doc1.docx"

    Set wrdDoc = Documents.Open(NewQuote1)

    'You can now reference the document using wrdDoc.
    wrdDoc.Activate

    MsgBox wrdDoc.Name

End Sub

将现有文档分配给vba中的变量

1 个答案: