AcroExch.AVDoc: PrintPagesEx メソッド

TOP > AcroExch.AVDoc > PrintPagesEx      [...]


説明

PDFドキュメントの印刷範囲ページ等を指定して印刷します。

PrintPagesExには、PrintPagesより多くのパラメタがあります。

デフォルトのプリンタ設定で印刷されます。(変更可能。備考参照)

 

形式

VARIANT_BOOL printPagesEx(long nFirstPage,
                                 long nLastPage,
                                 long nPSLevel,
                                 long bBinaryOk,
                                 long bShrinkToFit,
                                 long bReverse,
                                 long bFarEastFontOpt,
                                 long bEmitHalftones,
                                 long iPageOption); 

 

引数

  1. 第1引数(long nFirstPage) :
    印刷を開始する頁番号。1頁目は0を指定する。
  2. 第2引数(long nLastPage) :
    印刷の終了頁。第1引数に注意。
  3. 第3引数(long nPSLevel) :
    ポストレベルを指定する。(2又は3)
  4. 第4引数(long bBinaryOk) :
    0以外の数値ならバイナリーデータ。
    0は7-bit ASCIIデータ。
  5. 第5引数(long bShrinkToFit) :
    用紙の印刷可能領域に収まる様に縮小印刷指定する。
      0(false)=縮小印刷する
      0以外(true)=縮小しない
  6. 第6引数(long bReverse) :
    (ポストスクリプト印刷専用)
      正の数:逆順に印刷
      正の数で無い:昇順に印刷
  7. 第7引数(long bFarEastFontOpt) :
    (ポストスクリプト印刷専用)
      目的のプリンタに「マルチ-バイト」字体があるなら、正の数にセット。
      でなければ、0にセット。
  8. 第8引数(long bEmitHalftones) :
    (ポストスクリプト印刷専用)
      0以外の正の数:ドキュメントで指定されたハーフトーン
      0:以外。
  9. 第9引数(long iPageOption) :
    印刷範囲のオプション。以下のどれかを指定する。
    IAC.BASのモジュールから
    PDAllPages(-3):範囲内の全てのページ
    PDEvenPagesOnly(-5):偶数ページのみ
    PDOddPagesOnly(-4):奇数ページのみ
    参照:http://kb2.adobe.com/jp/cps/510/510763.html 

 





戻り値

  • 0 : 成功。
  • -1 : PDFドキュメントがオープンされてないか、他で印刷中の場合。  

 

動作するバージョン

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

説明:PDFドキュメントの印刷範囲ページ等を指定して印刷します。

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

 

Sub AcroExch_AVDoc_PrintPagesEx()

    Dim objAcroApp As New Acrobat.AcroApp
    Dim objAcroAVDoc As New Acrobat.AcroAVDoc
    Dim lRet As Long

    'Acrobatアプリケーションを起動する。
    lRet = objAcroApp.Show
    'PDFファイルを開いて表示する。
    lRet = objAcroAVDoc.Open("E:¥Test01.pdf", "")

    'PDFファイルの頁を指定して印刷する。
    lRet = objAcroAVDoc.PrintPagesEx(1, 2, 2, 0, 0, _
                                0, 0, 0, PDAllPages)

   'PDFファイルを閉じます。
    lRet = objAcroAVDoc.Close(1)

    'Acrobatアプリケーションを終了する。
    lRet = objAcroApp.Hide
    lRet = objAcroApp.Exit

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

End Sub 

 

補足

 

動作確認環境

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

 

参考

 

戻る


キーボード

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

  1. [ CTRL ] + [ + ]  :  文字を大きく
  2. [ CTRL ] + [ - ]  :  文字を小さく

Shortcut Keys

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

コメントを残す

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

CAPTCHA


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


SAMURAI Plugin

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

  • OS名 バージョン
  • Acrobat バージョン
  • ツール(Excel等) バージョン
コメントにサンプルコードを入れるとエラーになる場合が有ります。その時はコードの前後に <code> ・・・</code> タグを入れてください。

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