• ベストアンサー

VBAでPDFをテキスト出力する時のエラー

PDFをテキスト出力するVBA実行時、Acrobatから「ファイルを開けません」とエラーメッセージが表示されます。何のファイルなのかわからないので教えてください。 下記VBAで、最終行の「objJs.SaveAs txtFilePath, "com.adobe.acrobat.plain-text"」でPDFは読み込まれて画面表示されますが、同時に「ファイルを開けません」というメッセージが表示されます。PDFは正常に読み込まれていると思われるので、ほかに何が必要なのか教えてください。 AcrobatとMicrosoftScriptingRuntimeは組み込んでいます。 -------------------------------------------- 'PDFのデータをExcelに読み込むメイン処理 Sub Main() 'PDFファイルをテキストに変換するための定数を用意 Const fileName = "テストファイル" Const folderPath = "C:\Data\" Const pdfFilePath = folderPath & fileName & ".pdf" Const txtFilePath = folderPath & fileName & ".txt" 'PDFファイルをテキストに変換 Call convPDFtoText(fileName, folderPath, pdfFilePath, txtFilePath) End Sub 'PDFファイルをテキスト変換する処理 Sub convPDFtoText(fileName As String, folderPath As String, pdfFilePath As String, txtFilePath As String) 'Acrobat操作用の変数を宣言 Dim objAcrobatApp As New Acrobat.AcroApp Dim objAcrobatAVDoc As New Acrobat.AcroAVDoc Dim objAcrobatPDDoc As Acrobat.AcroPDDoc Dim AcrobatId As Long Dim objJs As Object 'Acrobatアプリを起動 AcrobatId = objAcrobatApp.Show 'PDFファイルを開く AcrobatId = objAcrobatAVDoc.Open(pdfFilePath, "") 'PDDocオブジェクトを取得 Set objAcrobatPDDoc = objAcrobatAVDoc.GetPDDoc() 'Acrobat JavaScriptオブジェクトを作成 Set objJs = objAcrobatPDDoc.GetJSObject 'PDFをテキストで保存 objJs.SaveAs txtFilePath, "com.adobe.acrobat.plain-text"

質問者が選んだベストアンサー

  • ベストアンサー
  • kkkkkm
  • ベストアンサー率66% (1719/2589)
回答No.2

過去の事例でかつExcel変換の話ですが 『環境設定』で復旧しました とありますので試してみてはいかがでしょう VBA上でのPDF→Excelの変換ができなくなりました https://community.adobe.com/t5/acrobat%E3%83%95%E3%82%A9%E3%83%BC%E3%83%A9%E3%83%A0-discussions/vba%E4%B8%8A%E3%81%A7%E3%81%AEpdf-excel%E3%81%AE%E5%A4%89%E6%8F%9B%E3%81%8C%E3%81%A7%E3%81%8D%E3%81%AA%E3%81%8F%E3%81%AA%E3%82%8A%E3%81%BE%E3%81%97%E3%81%9F/td-p/12535946?profile.language=ja こちらは復旧したという事例ではないませんが、回答でこれしてみたら的な回答があるのでそれも参考にしてみてはいかがでしょう。 pdfをテキストで保存でエラー https://community.adobe.com/t5/acrobat%E3%83%95%E3%82%A9%E3%83%BC%E3%83%A9%E3%83%A0-discussions/pdf%E3%82%92%E3%83%86%E3%82%AD%E3%82%B9%E3%83%88%E3%81%A7%E4%BF%9D%E5%AD%98%E3%81%A7%E3%82%A8%E3%83%A9%E3%83%BC/td-p/13723029?profile.language=ja

azx88169
質問者

お礼

回答ありがとうございました。 書かれていた「環境設定」のとおりに変更したらエラーが出なく変換できました。 ありがとうございました。 でも、なぜ回避できたのかは全くわかりません。

その他の回答 (1)

  • FattyBear
  • ベストアンサー率33% (1530/4610)
回答No.1

想像ですがファイルを開くときに時間がかかりAcrobatから読み込み時間でタイムアウト?がかかり 「ファイルを開けません」と表示だけ出たのではないでしょうか。 私もPCの不具合か通信速度が極端に遅いのか似たような表示「繋げられません」とかアプリは言ってきますが 待っていると繋がります。

azx88169
質問者

補足

回答ありがとうございます。 タイムアウトもあるんですかね。 タイムアウト確認のため1ページの軽いPDFで試しましたが、PDF表示と同時にAcrobatから「ファイルを開けません」と表示されます。 何かのシステムファイルが足りないのか?と考えても思い当たる節がありません。 どん詰まりです。

関連するQ&A