TOP > AcroExch.AVPageView > GetPageNum [...]
説明
現在表示している頁番号を取得する。
最初の頁は０で返される。
形式
long GetPageNum();
戻り値
- 戻り値はページ番号。
引数
- 無し。
動作するバージョン
| Version | Adobe Acrobat | 備考 |
|---|---|---|
| 4 | - | Acrobat 4.0 ※Windows 98SE + Excel 2000 |
| 5 | - | Acrobat 5.0.5 |
| 6 | - | Acrobat 6.0.3 Pro |
| 7 | OK | Acrobat 7.0.9 Pro (Acrobat 7.1.4 Proは未確認) |
| 8 | - | 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
- 8キーでステップ実行しながら動作確認する。
- 事前に参照設定をする。
001 Sub AcroExch_AVPageView_GetPageNum()
002
003 Dim objAcroApp As New Acrobat.AcroApp
004 Dim objAcroAVDoc As New Acrobat.AcroAVDoc
005 Dim objAVPageView As Acrobat.AcroAVPageView
006 Dim lRet As Long
007
008 'Acrobatアプリケーションを起動する。
009 lRet = objAcroApp.Show
010 'PDFファイルを開いて表示する。
011 lRet = objAcroAVDoc.Open("E:\Test01.pdf", "")
012 'GetAVPageViewオブジェクトを作成する。
013 Set objAVPageView = objAcroAVDoc.GetAVPageView
014 'PDFファイルの２ページ目を表示する。
015 lRet = objAVPageView.Goto(1)
016 '画面表示している頁番号を表示する。
017 MsgBox objAVPageView.GetPageNum()
018
019 'PDFファイルを閉じます。
020 lRet = objAcroAVDoc.Close(1)
021 'Acrobatアプリケーションを終了する。
022 lRet = objAcroApp.Hide
023 lRet = objAcroApp.Exit
024
025 End Sub
Highlight：プログラミング言語のソースコードを構文で色分け (GUI編)
補足
- 特に無し。
動作確認環境
- WindowsXP Pro(+ SP2) +
Acrobat 7.0.9 Pro + Office 2003 + MicrosoftUpdate
＜ 戻る ＞