AcroExch.App： ToolButtonRemove メソッド

TOP > AcroExch.App > *

説明

ツールバーから指定されたボタンを取り外します。Acrobatアプリケーションを再起動すると元の状態に戻ります。

形式

VARIANT_BOOL ToolButtonRemove(BSTR szButtonName);

引数

第一引数(BSTR szButtonName)：
ツールバーのボタン名。英文字列で指定します。

戻り値

-1 ： True(真)で成功。
0 ： False(偽)で失敗。
存在しないツール名を指定した。

動作するバージョン

Acrobat	動作	備考
4	OK	Acrobat 4.0 ※Windows 98SE + Excel 2000
5	OK	Acrobat 5.0.5
6	OK	Acrobat 6.0.3 Pro
7	OK	Acrobat 7.0.9 Pro Acrobat 7.1.4 Pro
8	OK	Acrobat 8.2.2 Pro
9	OK	Acrobat 9.3.2 Extended
10	―	Acrobat X (10.1.8) Extended
11	―	Acrobat XI (11.0.04) Extended

OK：動作します。
NO：動作しない。
―：未確認。

サンプル：Excel のVBA

Acrobatアプリケーションのツールボタンが取り外します。画面から消します。

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

001 Sub AcroExch_App_ToolButtonRemove()
002 
003     'Acrobatオブジェクトの定義＆作成
004     'Acrobat 4,5,6 の時
005 '    Dim objAcroApp   As Acrobat.CAcroApp
006 '    Set objAcroApp   = CreateObject("AcroExch.App")
007 
008     'Acrobat 7,8,9,10,11 の時
009     Dim objAcroApp   As New Acrobat.AcroApp
010 
011     '以降はAcrobat全て共通
012     Dim lRet        As Long     '戻り値
013     'Const CON_TOOL_NAME = "Select"  '「矢印」又は「選択」
014     'Const CON_TOOL_NAME = "Hand"    '「手」
015     Const CON_TOOL_NAME = "ZoomIn"
016      
017     'Acrobatを起動表示する
018     lRet = objAcroApp.Show
019          
020     lRet = objAcroApp.ToolButtonRemove(CON_TOOL_NAME)
021     'MsgBox CON_TOOL_NAME & "=" & lRet
022      
023     'アプリケーションの終了
024     lRet = objAcroApp.Hide
025     lRet = objAcroApp.Exit
026 
027     'オブジェクトの強制開放
028     Set objAcroApp = Nothing
029 
030 End Sub

テスト結果

（ツールバーにあるズームボタンが消えます。）

１．Acrobat v7 ※PDFドキュメントを表示した場合

２．Acrobat v8 v9 ※PDFドキュメントを表示しない場合

↓

補足

戻り値は真(True=-1)がセットされます。
存在しないツールボタンの名前を指定しても戻り値は真(True=-1)がセットされます。
Acrobatアプリケーションを再起動すると元の状態に戻ります。
引数はツールボタンの名前を指定します。
例：ZoomIn , ZoomOut ,Open , etc.
このメソッドの逆のメソッドは存在しません。
Acrobatアプリケーションのバージョンによって外される(消える)ツールボタンは多少異なります。

注意

Acrobatアプリケーションがメモリ上から完全に消えるのにCPU速度にも異なるが、２～３秒は掛かります。即座にAcrobatアプリケーションを再起動するとメモリ上に残っているAcrobatアプリケーションが使用されて、ツールボタンは外された(消えた)状態で画面表示されます。

Adobe Web 解説

OLE Automation / AcroExch.App / ToolButtonRemove (公式サイト・英語)

動作確認環境

Windows98SE( + WindowsUpdate) +
Acrobat 4.0 + Office 2000
WindowsXP Pro( + SP3 + WindowsUpdate) +
Acrobat 5.0.5 + Office 2003( + SP3)
WindowsXP Pro( + SP3 + WindowsUpdate) +
Acrobat 6.0.3 Pro + Office 2003( + SP3)
WindowsXP Pro( + SP2 + WindowsUpdate) +
Acrobat 7.0.9 Pro + Office 2003
WindowsXP Pro( + SP3 + WindowsUpdate) +
Acrobat 7.1.4 Pro + Office 2003( + SP3)
WindowsXP Pro( + SP3 + WindowsUpdate) +
Acrobat 8.2.2 Pro + Office 2003( + SP3)
WindowsXP Pro( + SP3 + WindowsUpdate) +
Acrobat 9.3.2 Extended + Office 2003( + SP3)

＜戻る＞

PDF