ExcelWork.info

Excel(エクセル)のマクロ・VBA・関数・操作などのメモ

印刷実行前に総ページ数を取得(ExecuteExcel4Macro メソッド)

   

印刷の総ページ数を取得(ExecuteExcel4Macro メソッド)

Excel 4.0 には、印刷実行前に、印刷の総ページ数を取得することができるマクロがあり、ExecuteExcel4Macro メソッド で、VBA から呼び出して使用することができます。


【書式】

<取得>
object.ExecuteExcel4Macro ( “GET.DOCUMENT( 50 [, “”sheetname“” ] )” )


引数・戻り値

  • object  ・・・  対象となる Application オブジェクト を指定します。
  • sheetname  ・・・  シート名を指定します。省略した場合は、現在アクティブなシートが対象となります。


印刷総ページ数を取得する例

サンプルVBAソース 1


実行結果 1

アクティブシートの印刷総ページ数を取得



サンプルVBAソース 2


実行結果 2

指定したシートの印刷総ページ数を取得



 - ブック・シートの操作 , , , , ,

Message

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

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

  関連記事

RecentFile オブジェクト・RecentFiles コレクション
最近使用したファイル(RecentFile オブジェクト,RecentFiles コレクション)

最近使用したファイル(RecentFile オブジェクト,RecentFiles …

印刷 タイトル行・列 設定の例
印刷のタイトル行、タイトル列を設定(PrintTitleRows,PrintTitleColumns)

PageSetup.PrintTitleRows プロパティ PageSetup …

印刷設定(先頭ページのヘッダー・フッターを設定)DifferentFirstPageHeaderFooter, FirstPage

先頭ページに別のヘッダーおよびフッターを設定 先頭ページのヘッダーおよびフッター …

数式バーの設定(DisplayFormulaBar, FormulaBarHeight)

数式バーの設定 数式バーの表示・非表示の設定を行うには、DisplayFormu …

印刷時、シート内のエラーをどう扱うかを設定(PrintErrors プロパティ)

PageSetup.PrintErrors プロパティ PageSetup.Pr …

PrecisionAsDisplayed プロパティ 01
計算精度を設定する(PrecisionAsDisplayed プロパティ)

PrecisionAsDisplayed プロパティ PrecisionAsDi …

アクティブプリンタの設定・取得
アクティブプリンタを変更(ActivePrinter プロパティ)

ActivePrinter プロパティ ActivePrinter プロパティを …

印刷範囲の設定・解除(PageSetup.PrintArea プロパティ)

PageSetup.PrintArea プロパティ 印刷範囲を設定するには、Pa …

Paste メソッド 使用例_1
ワークシートにクリップボードの内容を貼り付ける(Paste メソッド)

Paste メソッド 指定したワークシート上にクリップボードのデータを貼り付けま …

ユーザー設定のビュー(CustomView オブジェクト)

ユーザー設定のビュー CustomView オブジェクトは、登録されている各ビュ …