TOP > AcroExch.AVDoc > *
説明
AcroExch.AVDocに関連しているAcroExch.PDDocオブジェクトを手に入れます。
形式
LPDISPATCH GetPDDoc();
引数
- 無し。
戻り値
- 戻り値はAcroExch.PDDocオブジェクト。
- 戻り値がNULLの時は、PDFドキュメントがオープンされてない。失敗した。
動作するバージョン
| Acrobat | 動作 | 備考 |
|---|---|---|
| 4 | OK | Acrobat 4.0 ※Windows 98SE + Excel 2000 |
| 5 | OK | Acrobat 5.0.5 |
| 6 | OK | Acrobat 6.0.3 Pro |
| 7 | OK | Acrobat 7.0.9 Pro Acrobat 7.1.4 Pro |
| 8 | OK | Acrobat 8.2.2 Pro |
| 9 | OK | Acrobat 9.3.2 Extended |
| 10 | ― | Acrobat X (10.1.8) Extended |
| 11 | ― | Acrobat XI (11.0.04) Extended |
- OK:動作します。
- NO:動作しない。 戻り値が0を返します。
- ―:未確認。
サンプル:Excel のVBA
AcroPDDocオブジェクトを作成して、動作確認をします。/p>
- 事前に参照設定をします。
- F8キーでステップ実行しながら動作確認します。
001 Sub AcroExch_AVDoc_GetPDDoc()
002
003 'Acrobatオブジェクトの定義&作成
004 'Acrobat 4,5,6 の時
005 ' Dim objAcroApp As Acrobat.CAcroApp
006 ' Dim objAcroAVDoc As Acrobat.CAcroAVDoc
007 ' Dim objAcroPDDoc As Acrobat.CAcroPDDoc
008 ' Set objAcroApp = CreateObject("AcroExch.App")
009 ' Set objAcroAVDoc = CreateObject("AcroExch.AVDoc")
010
011 'Acrobat 7,8,9,10,11 の時
012 Dim objAcroApp As New Acrobat.AcroApp
013 Dim objAcroAVDoc As New Acrobat.AcroAVDoc
014 Dim objAcroPDDoc As Acrobat.AcroPDDoc
015
016 '以降はAcrobat全て共通
017 Dim lRet As Long '戻り値
018
019 '①PDFファイルを開く。(メモリ上)
020 lRet = objAcroAVDoc.Open("E:\Test01.pdf", "")
021 '②Acrobatアプリケーションを起動し、画面表示する。
022 lRet = objAcroApp.Show
023
024 'PDDocオブジェクトを取得する。
025 Set objAcroPDDoc = objAcroAVDoc.GetPDDoc()
026 'PDDocオブジェクトのGetFlagsメソッドの戻り値を表示する。
027 MsgBox "AcroPDDoc.GetFlags(1)=" & objAcroPDDoc.GetFlags
028
029 'PDFファイルを閉じます。
030 lRet = objAcroAVDoc.Close(1)
031
032 'Acrobatアプリケーションを終了する。
033 lRet = objAcroApp.Hide
034 lRet = objAcroApp.Exit
035
036 'オブジェクトを強制解放する
037 Set objAcroPDDoc = Nothing
038 Set objAcroAVDoc = Nothing
039 Set objAcroApp = Nothing
040
041 End Sub
実行結果
補足
- 特に変なコーディングをしない限り、失敗は無い。
Adobe Web 解説
OLE Automation / AcroExch.AVDoc / GetPDDoc (公式サイト・英語)
動作確認環境
- Windows98SE( + WindowsUpdate)
+ Acrobat 4.0 + Office 2000 - WindowsXP Pro( + SP3 + WindowsUpdate)
+ Acrobat 5.0.5 + Office 2003( + SP3) - WindowsXP Pro( + SP3 + WindowsUpdate)
+ Acrobat 6.0.3 Pro + Office 2003( + SP3) - WindowsXP Pro( + SP2 + WindowsUpdate)
+ Acrobat 7.0.9 Pro + Office 2003 - WindowsXP Pro( + SP3 + WindowsUpdate)
+ Acrobat 7.1.4 Pro + Office 2003( + SP3) - WindowsXP Pro( + SP3 + WindowsUpdate)
+ Acrobat 8.2.2 Pro + Office 2003( + SP3) - WindowsXP Pro( + SP3 + WindowsUpdate)
+ Acrobat 9.3.2 Extended + Office 2003( + SP3)
< 戻る >
