エクセルVBAでワード文書をPDF保存
質問の仕方が悪かったようですので先日の質問
https://okwave.jp/qa/q9876787.html
を取り消し、再度質問させていただきます。
エクセル2016のワークシート上にオブジェクトの挿入でワードの文書ファイルをアイコンで貼り付けています。VBAでこの文書ファイルを開き、PDFとして保存しようと思います。
見よう見まねで以下のようなコードを書いてみまた。
'参照設定 Microsoft Word 16.0 Object Library
Sub test01()
Dim objWord As Word.Application
Set objWord = CreateObject("Word.Application")
objWord.Visible = True
Dim objDoc As Word.Document
Dim FileName As String
FileName = Application.GetSaveAsFilename(, "PDFファイル,*.pdf", , "PDF保存")
Set objDoc = Worksheets("Sheet1").OLEObjects(1).Verb(Verb:=xlVerbOpen)
objDoc.ExportAsFixedFormat OutputFileName:=FileName, ExportFormat:=wdExportFormatPDF
objDoc.Close
End Sub
これで、文書ファイルは開くのですが、「オブジェクトが必要です」のエラーがでて、Set objDocがEmptyのままPDF保存ができません。どのように直せばいいのでしょうか?
ご教示ください。
お礼
Readerを許可--というお言葉にヒントがありました。 Reader7.0をもう一度確認したら、インストールが途中でストップしていたようです。というか、入れたつもりがQしたらまた作業開始。 それが終わってから、もう一度PDF文書に当たったら今度は開きました。有り難うございます。
補足
「ファイアウォールの設定」というのはどうすればいいのですか。 およそのことを教えてください。