TOP > AcroExch.AVDoc > Close [...]
説明
PDFドキュメントを閉じます。同時にPDFドキュメントのインスタンスも閉じます。
PDFドキュメントが変更されていた場合の動作(保存する、保存しない)も指示できます。
形式
VARIANT_BOOL Close(long bNoSave);
引数
- 第一引数(long bNoSave)：
正の数なら、PDFドキュメントを保存しないで閉じます。
0でしかもPDFドキュメントが変更されたなら、ユーザはPDFドキュメントを保存されるべきであるかどうかを確認するダイアログ・メッセージを表示して尋ねられます。
戻り値
- 戻り値は常に-1。
動作するバージョン
| Version | Adobe 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
- F8キーでステップ実行しながら動作確認する。
- 事前に参照設定をする。
001 Sub AcroExch_AVDoc_Close()
002
003 'Acrobatオブジェクトの定義＆作成
004 'Acrobat 4,5,6 の時
005 ' Dim objAcroApp As Acrobat.CAcroApp
006 ' Dim objAcroAVDoc As Acrobat.CAcroAVDoc
007 ' Set objAcroApp = CreateObject("AcroExch.App")
008 ' Set objAcroAVDoc = CreateObject("AcroExch.AVDoc")
009
010 'Acrobat 7,8,9,10,11 の時
011 Dim objAcroApp As New Acrobat.AcroApp
012 Dim objAcroAVDoc As New Acrobat.AcroAVDoc
013
014 '以降はAcrobat全て共通
015 Dim lRet As Long '戻り値
016
017 '①PDFファイルを開く。(メモリ上)
018 lRet = objAcroAVDoc.Open("C:\work\Test01.pdf", "")
019 '②Acrobatアプリケーションを起動し、画面表示する。
020 lRet = objAcroApp.Show
021
022 '※この間にこのPDFを変更します。
023
024 'PDFファイルを閉じます。
025 '※変更されていると反映するかを尋ねるダイアログが表示されます。
026 lRet = objAcroAVDoc.Close(0)
027
028 'Acrobatアプリケーションを終了する。
029 lRet = objAcroApp.Hide
030 lRet = objAcroApp.Exit
031
032 'オブジェクトを強制解放する
033 Set objAcroAVDoc = Nothing
034 Set objAcroApp = Nothing
035
036 End Sub
Highlight：プログラミング言語のソースコードを構文で色分け (GUI編)
補足
- 引き数に０を指定して、しかもPDFドキュメントを変更した時はメッセージ・ダイアログが表示され処理は一時中断します。
そのメッセージに答える（クリック）すると次の処理に進みます。
注意
- 第一引数が0でしかもPDFドキュメントが変更されたなら、以下のようなダイアログが表示されます。
※Acrobat v4.0 v5.0 の場合
※Acrobat v6.0 ～ v9.0 の場合 (何故かファイル名が表示されない？)
上記ダイアログに返答しない限り、次の命令は実行されません。 - Showメソッドの位置に注意が必要です。
Openメソッドの後にShowメソッドを使用しないと何もPDFドキュメントを開いていない画面が表示されたり、Test01.PDFが画面表示されない不具合が発生します。（Acrobat v8 v9 の場合） - Acrobat 7.1.4の場合
第一引数で保存指定をして、PDFが変更されている場合、
以下のダイアログが表示されて、VBAが終了できなくなる場合があります。
その場合はExcel自体を強制終了するか、PCを強制終了してください。
Microsoft Excel
別のプログラムでOLEの操作が完了するまで待機を続けます。
動作確認環境
- 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)
Adobe Web 解説 URL(英語) v9.1
＜ 戻る ＞
 ブラウザ画面の文字サイズを変更するショートカットキー
|