TOP > AcroExch.AVDoc > *

---

説明

現在の文字列選択が目に見えるように表示位置を元に戻します。

形式

VARIANT_BOOL ShowTextSelect();

戻り値

• 0以外：正常処理。
• 0：ファイルがオープンされてない。

引数

1. 無し。

動作するバージョン

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

• 事前に参照設定をします。
• F8キーでステップ実行しながら動作確認します。

001 Sub AcroExch_AVDoc_ShowTextSelect() 002 003 Dim objAcroApp As New Acrobat.AcroApp 004 Dim objAcroAVDoc As New Acrobat.AcroAVDoc 005 Dim lRet As Long 006 007 'Acrobatアプリケーションを起動する。 008 lRet = objAcroApp.Show 009 'PDFファイルを開いて表示する。 010 lRet = objAcroAVDoc.Open("E:\Test01.pdf", "") 011 'Test01.pdfから"Acrobat"文字列を検索する｡ 012 lRet = objAcroAVDoc.FindText("Acrobat", 1, 1, 1) 013 014 '・・この間に表示頁を（手動で）移動する。 015 016 '元の選択文字列頁が表示される。 017 lRet = objAcroAVDoc.ShowTextSelect() 018 019 'PDFファイルを閉じます。 020 lRet = objAcroAVDoc.Close(1) 021 022 'Acrobatアプリケーションを終了する。 023 lRet = objAcroApp.Hide 024 lRet = objAcroApp.Exit 025 026 'PDFオブジェクトを強制解放する 027 Set objAcroAVDoc = Nothing 028 Set objAcroApp = Nothing 029 030 End Sub

　

　

補足

• もし文字列選択状態で他の頁に移動しても、このメソッドで元の頁に移動します。特に選択状態が変わるようには思えません。

Adobe Web 解説

OLE Automation / AcroExch.AVDoc / ShowTextSelect (公式サイト・英語)

動作確認環境

• WindowsXP Pro(+ SP2) +
  Acrobat 7.0.9 Pro + Office 2003 + MicrosoftUpdate

＜ 戻る ＞

---