Wordは起動できるが文書を開けないが?

Question 80.6 Excel VBA Borad (掲示板)より Previous Next
下記のようにしてwordを開こうとしても、 「ラベル2」ファイルが開きません。 やはり、フルパスでないとダメなのでしょうか? 相対パスで開く方法ありませんか?
Sub Rabel()
Dim ワード As Object
Dim ワード文書 As Object
Dim パス As String

フルパスを作成
    パス = "ラベル2.doc"
    Set ワード = CreateObject("Word.Application") 'Wordを起動する
    ワード.Visible = True                       'Wordを表示する
    Set ワード文書 = ワード.Documents.Open(パス) 'Word文書を開く
End Sub
Answer   2002.9.3 永井善王
このHPの 「Wordを起動して文書を開くには? 」 を参考にしていただいているようですね。 提示されたマクロを実行してみましたら、正常に動きました。
「相対パスで開く方法ありませんか?」ということですが、
パス = "ラベル2.doc" と記述されていますので、開いたブックが保存されているフォルダーに "ラベル2.doc" が保存されていなければなりません。 その点はよろしいですか?
うまくいきました
なんと初歩的なミスを・・ ご指摘ありがとうございます。うまくいきました。


 

Excel VBA Macro