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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください

  関連記事

枠線を含めて印刷(PageSetup.PrintGridlines プロパティ)

PageSetup.PrintGridlines プロパティ PageSetup …

ブックを参照(Workbooks プロパティ,Windows プロパティ)

アクティブなワークブックを参照 現在使用中のワークブック、複数ある場合は一番手前 …

ブックを保存する(Save メソッド)

ブックを保存する(Save メソッド) 既存のブックを上書き保存するには、Sav …

指定したセル範囲が含まれるワークシートを参照する(Worksheet プロパティ)

Worksheet プロパティ Worksheet プロパティは、指定したセル範 …

ブックの表示を変更(View プロパティ)

ブックの表示を変更(View プロパティ) View プロパティ で、ブックの表 …

新しいウィンドウを開く(NewWindow メソッド)

NewWindow メソッド NewWindow メソッドで、任意のブックのコピ …

再計算の設定・実行
再計算(Calculation, EnableCalculation, Calculate)

ワークブックやシートの再計算 通常、Excel では、自動的に再計算が行われる設 …

Excel を全画面表示(DisplayFullScreen プロパティ)

DisplayFullScreen プロパティ DisplayFullScree …

印刷の先頭のページ番号を設定(PageSetup.FirstPageNumber プロパティ)

PageSetup.FirstPageNumber プロパティ PageSetu …

RemoveDocumentInformation メソッド
指定された情報をブックから削除(RemoveDocumentInformation メソッド)

RemoveDocumentInformation メソッド 指定された種類の情 …