Acrobat/DDE: CloseAllDocs

説明

全ての開いていた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へ

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

CAPTCHA