2

Access 2013 を使用しており、フォームにヘルプ ボタンを作成して、Word 文書と指示を開きたいと考えています。私が試したコードは次のとおりです。

Private Sub cmdHelp_Click()
    Dim wrdApp As Word.Application
    Dim wrdDoc As Word.Document
    Dim filepath As String

    Set wrdApp = CreateObject("Word.Application")
    wrdApp.Visible = True

    filepath = "C:\...\Handout.docx"
    Set wrdDoc = wrdApp.Documents.Open(filepath)
End Sub

問題は、コンパイルしようとすると、最初の行に「ユーザー定義型が定義されていません」というエラーが表示されることです

4

2 に答える 2

4

するだけでは簡単ではありません：

Shell "winword ""c:\...\Handout.docx"""

...アプリケーションを開くためだけにオブジェクトを作成するのではなく?

于 2013-07-31T20:24:43.237 に答える
4

VBA環境でWordライブラリへの参照が適切に設定されているか確認してください。

これを行うには、次のパスに従います。

Go to VBA Editor >> Menu >> Tools >> References >> 
    Find on the list Microsoft Word XX.X Object Library where 
    XX.X is the highest available number >> 
Check it >> press OK.
于 2013-08-01T19:53:57.167 に答える