Acrobat/DDE: DocPageUp

説明

後方に1スクリーン分画面をスクロールします。

※Adobe Readerでは当DDEを使用出来ません。

 

形式

[DocPageUp(char* fullPath)]

 

引数

fullPath
[char*]
PDFファイルのフルパス
注意:パス中に空白があるときは注意する。

 

戻り値

true false以外のとき。
false fullPathによって指定されたPDFドキュメントが開かれてない。
又は失敗しました。

注)ExcelのVBAではDDE命令の発信ステートメント上で、戻り値を取得出来ません。

 


サンプル:ExcelのVBA

 

後方に1スクリーン分画面をスクロールします。

  • Excel VBA開発環境をF8キーでステップ実行して動作確認する。

 

Sub DDE_DocPageUp()

Dim lChanNo As Long ‘DDEチャンネル番号
‘パスに空白が入った時用にダブル引用符を付加

Const CON_PDF_PATH = """E:¥test01.pdf"""

‘Acrobatアプリケーション起動。
Shell "C:¥Program Files¥Adobe¥Acrobat 8.0¥Acrobat¥Acrobat.exe"
‘DDEチャンネルのオープン
lChanNo = DDEInitiate("Acroview", "Control")
‘PDFファイルのオープン
DDEExecute lChanNo, "[DocOpen(" & CON_PDF_PATH & ")]"
‘4頁に移動します。
DDEExecute lChanNo, "[DocGoTo(" & CON_PDF_PATH & ",3)]"
‘前方に1画面スクロールします。
DDEExecute lChanNo, "[DocPageUp(" & CON_PDF_PATH & ")]"
‘Acrobatアプリケーション終了
DDEExecute lChanNo, "[AppExit()]" ‘これをしないとAcrobatプロセスが残る
‘DDEチャネルを閉る
DDETerminate lChanNo

End Sub

 

実行結果

実行前

DocPageUp実行前

 

実行後

DocPageUp実行後

 

補足

  • Adobe Readerでは使用出来ません。
  • 何度も繰り返すと、1ページ(=表紙)に戻ります。
  • まるまるページ番号が1ページ移動する訳ではなく、画面単位のスクロールです。

 

動作確認環境

  • WindowsXP + SP3 + WindowsUpdate
  • Adobe Acrobat Pro 7.0.8 + Office Pro 2003
  • Adobe Acrobat Pro 8.1.4 + Office Pro 2003

 

Adobe社の解説ページ : 英語

以下がAdobe社のAcrobat DDEの解説ページです。表示には時間がかかります。
http://livedocs.adobe.com/acrobat_sdk/9/Acrobat9_HTMLHelp/IAC_API_DDE_Messages.104.16.html

 

TOPへ

コメントを残す

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

CAPTCHA