AcroExch.App: Restore メソッド

TOP > AcroExch.App > Restore      [...]


説明

Acrobatアプリケーションが最大化又は最小化されていれば、元の位置とサイズにAcrobatアプリケーションを表示します。

更にデスクトップ画面の最前列に表示して操作可能なアクティブ画面にします。

形式

VARIANT_BOOL Restore(long bRestore);

引数

  • 第一引数(long bRestore) 
    数字ならなんでもOK : 元のサイズに戻し、アクティブ画面にする。 省略不可。
    ※WEB Acrobat v9.1 SDKには0は不可とあるが、実際は数字ならなんでもOKです。 

戻り値

  • -1 : True(真)で成功
  • 0 : False(偽)で失敗

動作するバージョン

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

サンプル:ExcelのVBA

説明:Acrobatアプリケーションで最小化したり、元のサイズの戻したりする。

  • 参照設定を事前に行う。
  • 以下のサンプルはテスト用です。
    F8キーでステップ実行して動作確認します。
  • Sleep関数はF5(一気に実行)でのテスト用に入れました。

 

 

001 Public Declare Sub Sleep Lib "kernel32" _ 002 (ByVal dwMilliseconds As Long) 003 004 Sub AcroExch_App_Restore() 005 006 'Acrobatオブジェクトの定義&作成 007 'Acrobat 4,5,6 の時 008 ' Dim objAcroApp As Acrobat.CAcroApp 009 ' Dim objAcroPDDoc As Acrobat.CAcroPDDoc 010 ' Dim objAcroAVDoc As Acrobat.CAcroAVDoc 011 ' 012 ' Set objAcroApp = CreateObject("AcroExch.App") 013 ' Set objAcroPDDoc = CreateObject("AcroExch.PDDoc") 014 ' Set objAcroAVDoc = CreateObject("AcroExch.AVDoc") 015 016 'Acrobat 7,8,9,10,11 の時 017 Dim objAcroApp As New Acrobat.AcroApp 018 Dim objAcroPDDoc As New Acrobat.AcroPDDoc 019 Dim objAcroAVDoc As New Acrobat.AcroAVDoc 020 021 '以降はAcrobat全て共通 022 Dim lRet As Long '戻り値 023 Const CON_PDF_FILE = "C:\work\Test01.pdf" 024 025 'Acrobatを起動する 026 lRet = objAcroApp.Show 027 'PDFドキュメントを開く 028 lRet = objAcroPDDoc.Open(CON_PDF_FILE) 029 'PDFドキュメントを画面表示する 030 objAcroPDDoc.OpenAVDoc CON_PDF_FILE 031 032 Sleep 4000 '4秒待つ:TEST用 033 '最小化してタスクバーに隠す。 034 lRet = objAcroApp.Minimize(1) 035 Sleep 4000 '4秒待つ:TEST用 036 '元のサイズに戻す 037 lRet = objAcroApp.Restore(0) 038 Sleep 4000 '4秒待つ:TEST用 039 '最小化してタスクバーに隠す。 040 lRet = objAcroApp.Minimize(1) 041 Sleep 4000 '4秒待つ:TEST用 042 '元のサイズに戻す。 043 lRet = objAcroApp.Minimize(0) 044 Sleep 4000 '4秒待つ:TEST用 045 046 'PDFドキュメントを閉じる 047 lRet = objAcroApp.CloseAllDocs 048 'アプリケーションの終了 049 lRet = objAcroApp.Hide 050 lRet = objAcroApp.Exit 051 052 'オブジェクトの強制開放 053 Set objAcroAVDoc = Nothing 054 Set objAcroPDDoc = Nothing 055 Set objAcroApp = Nothing 056 End Sub


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

補足

  • Minimize(0)メソッドと同じ動きをする。
  • 第一引数は数字なら何でもOKです。 

動作確認環境

  • Windows98SE( + WindowsUpdate) +
    Acrobat 4.0 + Office 2000
  • WindowsXP Pro( + SP3 + WindowsUpdate) +
    Acrobat 5.0.5  + Office 2003
  • WindowsXP Pro( + SP3 + WindowsUpdate) +
    Acrobat 6.0.3 Pro + Office 2003
  • 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) 

Adobe Web 解説 URL(英語) v9.1

http://livedocs.adobe.com/acrobat_sdk/9.1/Acrobat9_1_HTMLHelp/IAC_API_OLE_Objects.103.23.html

戻る


キーボード

ブラウザ画面の文字サイズを変更するショートカットキー

  1. [ CTRL ] + [ + ]  :  文字を大きく

  2. [ CTRL ] + [ - ]  :  文字を小さく
Shortcut Keys

  1. [ CTRL ] + [ + ]  :  Up the font size

  2. [ CTRL ] + [ - ]  :  Down the font size

コメントを残す

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

CAPTCHA


★ 文章での質問は難しいですよネ。でも、早く解決して、家に帰りたい。


SAMURAI Plugin

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

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



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

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