AcroExch.AVPageView: ZoomTo メソッド

TOP > AcroExch.AVPageView > ZoomTo      [...]


説明

現在表示されているPDFページを、指定された表示タイプや倍率でズーム表示する。

 

形式

VARIANT_BOOL ZoomTo(short nType, short nScale);

 

引数

  1. 第1引数(short nType) :
    ズームタイプ
      AVZoomFitHeight(3) : 高さに合わせる
      AVZoomFitPage(1) : 全体表示
      AVZoomFitVisibleWidth(4) : 描画領域の幅に合わせる
      AVZoomFitWidth(2) : 幅に合わせる
      AVZoomNoVary(0) : 第2引数のズーム比で表示
  2. 第2引数(short nScale) :
    ズーム比。但し、第1引数が AVZoomNoVary(0) の時だけ反映される。
    100%の時は100をセットする。

 

戻り値

  • -1 : 成功
  • 0 : 成功以外

 

動作するバージョン

Version Adobe
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
8
OK
Acrobat 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

 

説明:ズーム比を変えてページを表示する

  • F8キーでステップ実行しながら動作確認する。
  • 事前に参照設定をする。
  • IAC.BASが標準モジュールで別途必要です。

 

Sub AcroExch_AVPageView_ZoomTo()

    Dim objAcroApp      As New Acrobat.AcroApp
    Dim objAcroAVDoc    As New Acrobat.AcroAVDoc
    Dim objAVPageView   As Acrobat.AcroAVPageView
    Dim lRet            As Long     '戻り値
    
    'Acrobatを起動表示する
    lRet = objAcroApp.Show
    'PDFドキュメントを開く
    lRet = objAcroAVDoc.Open("E:¥Test01.pdf", "")
    'AVPageViewオブジェクトを作成する
    Set objAVPageView = objAcroAVDoc.GetAVPageView
    
    'AVZoomFitHeight(3) :高さに合わせる
    lRet = objAVPageView.ZoomTo(AVZoomFitHeight, 50)
    'AVZoomFitPage(1):全体表示
    lRet = objAVPageView.ZoomTo(AVZoomFitPage, 50)
    'AVZoomFitVisibleWidth(4):描画領域の幅に合わせる
    lRet = objAVPageView.ZoomTo(AVZoomFitVisibleWidth, 50)
    'AVZoomFitWidth(2)  :幅に合わせる
    lRet = objAVPageView.ZoomTo(AVZoomFitWidth, 50)
    'AVZoomNoVary(0)    :第2引数のズーム比で表示
    lRet = objAVPageView.ZoomTo(AVZoomNoVary, 50)
    
    '保存しないでPDFドキュメントを閉じる
    lRet = objAcroAVDoc.Close(1)

    'Acrobatを閉じる
    lRet = objAcroApp.Hide
    lRet = objAcroApp.Exit

    'オブジェクトを強制解放する
    Set objAcroAVDoc = Nothing
    Set objAcroApp = Nothing

End Sub

 

補足

  • 「1ページ全体を表示」と「ウィンドウの幅に合わせて連続ページで表示」の設定には影響を与えない。
  • 現在、画面に表示しているズーム比とズームタイプを変更するだけです。
    初期画面設定でのズーム比等のプロパティには保存しても影響を与えません。

 

動作確認環境

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

 

戻る

コメントを残す

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

CAPTCHA


出来るだけ早く返答する様には心がけています。
が、遅くなる時もありますのでご了承ください。


SAMURAI Plugin

コメントをする時は最低でも以下をお願いします。

  • OS名 バージョン
  • Acrobat バージョン
  • ツール(Excel等) バージョン