0
私は、pdfにExcelの文字列を一致させるためにvbaコードを書いています。私がそれをやっている理由は、誰かが100を超えるpdfからの情報を要約して遵守したExcelシートを持っているからです。 PDF1の情報がPDF1の行にある場合など、情報が正しいセルに配置されているかどうかを再確認したい。そしておそらく私はこのコードを使って自動検索し、pdfのテキストを見つけます。Excel VBA gPdDoc.open（パス）が失敗しました
まだ、私はpdfを開いて立ち往生しました。 gPdDoc.open（path）は機能しません。私のコードは以下の通りです。
Sub FindText()
Dim gApp As Object, gPdDoc As Object
Set PdfAPP = CreateObject("AcroExch.App")
Set gPdDoc = CreateObject("AcroExch.AVDoc")
texttofind = "something I want to find"
filepath = "C:\Users\abc\Desktop\Switzerland"
If gPdDoc.Open(filepath, "") Then
foundtext=gPdDoc.findtext(texttofind)
Else
MsgBox ("Failed to open " & Path)
End If
End Sub
コードgPdDoc.Open（パスを、「」）を実行、Acrobatは開きますが、ポップアップウィンドウは次のように述べている「エラー時に開いているファイル、」ファイルを見つけることができません。私はかなりファイルパスが正しいと確信して、私はAcrobatでファイルを直接開くことができます（ダブルクリック）。 VBA経由でAcrobatでファイルを開こうとするとファイルが見つからないのは本当に混乱します。
私は本当にそれを動作させる方法を知りたいです。複数のPDFでテキストを自動検索する簡単な方法を誰かが知っていればさらに優れています。
多くのおかげでそれを見つけた
で終了する必要があります'' gPdDoc.Open（filepath、 "'）Then''をコンパイルするのをどのようにして管理しているのかよく分かりません！！？！閉じた二重引用符文字は存在しないので、従って "Then"はありません。 – YowE3K