説明
全ての開いていたPDFドキュメントを閉じます。
形式
[CloseAllDocs()]
引数
無し。
戻り値
true | PDFドキュメントを閉じるのに成功しました。 |
false | 失敗しました。 |
注)ExcelのVBAではDDE命令の発信ステートメント上で、戻り値を取得出来ません。
サンプル:Excel のVBA
全ての開いていたPDFドキュメントを閉じます。
- Excel VBA開発環境をF8キーでステップ実行して動作確認します。
Sub DDE_CloseAllDocs()
Dim lChanNo As Long ‘DDEチャンネル番号
Dim strFilePath As String ‘PDFファイルパス
‘ Shell “C:¥Program Files¥Adobe¥Acrobat 9.0¥Acrobat¥Acrobat.exe”
Shell “C:¥Program Files¥Adobe¥Reader 9.0¥Reader¥AcroRd32.exe”
‘パスに空白が入った時用にダブル引用符を付加
strFilePath = “””E:¥iac_developer_guide.pdf”””
‘DDEチャンネルのオープン
lChanNo = DDEInitiate(“Acroview”, “Control”)
‘PDFファイルのオープン
DDEExecute lChanNo, “[DocOpen(“ & strFilePath & “)]”
‘全ての開いているPDFファイルをクローズ
DDEExecute lChanNo, “[CloseAllDocs()]”
‘Acrobatアプリケーション終了
DDEExecute lChanNo, “[AppExit()]” ‘これをしないとAcrobatプロセスが残る
‘DDEチャネルを閉る
DDETerminate lChanNo
End Sub
備考
- Acrobat、又はAcrobat Reader共にテスト確認済み。
動作確認環境
- WindowsXP + SP3 + フルWindowsUpdate
Acrobat Pro 9.1.0 + Office Pro 2003
Adobe Reader 9.1.0 + Office Pro 2003
Adobe社の解説ページ : 英語
以下がAdobe社のAcrobat DDEの解説ページです。
表示には時間がかかります。
http://livedocs.adobe.com/acrobat_sdk/9/Acrobat9_HTMLHelp/IAC_API_DDE_Messages.104.5.htm
< TOPへ >