2016-11-15 7 views
0

誰かがこれに関する構文を教えてくれますか? 私は開いて後で有効にできる変数に既存の文書を割り当てたいと思います。コード(vbaプロジェクトを含むドキュメントを含む)を実行するときに複数のドキュメントが開いている可能性がありますので、適切なものを有効にする必要があります。私は「 以下の私は、ファイル名ではなく、最終的なラインでファイルパスを必要とするが、私は2行目のパスからこれを抽出する方法を知らないので動作しません...vbaの変数に既存のドキュメントを割り当てる

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

+0

あなたが探しているファイル名のプロパティを取得するためにFileSystemObjectオブジェクトを使用することができます。それをhttps://blogs.technet.microsoft.com/heyscriptingguy/2006/05/30/how-can-i-extract-just-the-file-name-from-the-fullで使用する方法を示すよい例がいくつかあります-path-to-the-file/ – dbmitch

答えて

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 
+0

これは非常に役に立ちます。ありがとう –

+0

ちょうどあなたの質問では、VBAプロジェクトを含むドキュメントについて話していることに気付きました。このドキュメントは 'ThisDocument'を使って常に参照できるので、' ThisDocument.Activate'、 'Msgbox ThisDocument.Name'などです。 –

関連する問題