AcroExch.AVPageView: ScrollTo メソッド

TOP > AcroExch.AVPageView > ScrollTo      [...]


説明

画面を指定ポイント(X,Y)でスクロールする。

形式

VARIANT_BOOL ScrollTo(short nX, short nY);

引数

  1. 第1引数(short nX) :
    目的のX座標
  2. 第2引数(short nY):
    目的のY座標

戻り値

  • -1 : スクロール出来たら。
  • 0 : できないなら。

動作するバージョン

VersionAdobe
Acrobat
備考
4-Acrobat 4.0    ※Windows 98SE + Excel 2000
5
-
Acrobat 5.0.5
6
-
Acrobat 6.0.3 Pro
7-Acrobat 7.0.9 Pro
Acrobat 7.1.4 Pro
8OKAcrobat 8.1.2 Pro
9-Acrobat 9.3.2 Extended
10-Acrobat X (10.1.8) Extended
11-Acrobat XI (11.0.04) Extended
  • OK = 動作する。
  • NO = 動作しない。 戻り値が0を返す。
  • - = 未確認。

サンプル:ExcelのVBA

説明:画面を指定ポイント(X,Y)でスクロールする。

  • F8キーでステップ実行しながら動作確認する。
  • 事前に参照設定をする。
001 Sub AcroExch_AVPageView_ScrollTo() 002 003 Dim objAcroAVDoc As New Acrobat.AcroAVDoc 004 Dim objAVPageView As Acrobat.AcroAVPageView 005 Dim lRet As Long '戻り値 006 Dim x As Long 007 Dim y As Long 008 009 'PDFドキュメントを開く。Acrobatも起動する。 010 lRet = objAcroAVDoc.Open("E:\Test01.pdf", "") 011 'AVPageViewオブジェクトを作成 012 Set objAVPageView = objAcroAVDoc.GetAVPageView 013 lRet = objAVPageView.Goto(2) '3頁に移動 014 '画面を指定ポイント(X,Y)でスクロールする 015 x = -50 '左(x)へ50ポイント 016 y = 200 '下(y)へ200ポイント 017 lRet = objAVPageView.ScrollTo(x, y) 018 019 '保存しないでPDFドキュメントを閉じる 020 lRet = objAcroAVDoc.Close(1) 021 'オブジェクトを強制解放する。Acrobatも終了する。 022 Set objAVPageView = Nothing 023 Set objAcroAVDoc = Nothing 024 025 End Sub


 Highlight:プログラミング言語のソースコードを構文で色分け (GUI編)
 

 

補足

  • 最終ページや先頭ページに至って、スクロール出来なくても戻り値は-1が返される。
  • PDFの座標系はページの左下隅を基点としていますが、注釈の座標はページの左上隅を基点とします。

動作確認環境

  • WindowsXP Pro(+ SP3) +
    Acrobat 8.1.2 Pro + Office 2003 + MicrosoftUpdate

戻る

コメントを残す

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

CAPTCHA



SAMURAI Plugin

コメントをする時は出来れば以下もお願いします。

  • OS名 バージョン
  • Acrobat バージョン
  • ツール(Excel等) バージョン
コメントにサンプルコードを入れる時はコードを全て全角文字列にしてください。コチラで半角に戻します。それでもエラーが回避できない時はコメント下さい。個別に対処します。



お仕事で当サイトを見ている方へ
考え込んだら、ご質問下さい。
一緒に解決策を考えましょう。

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください