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

  関連記事

印刷のページ区切り(DisplayPageBreaks プロパティ)

DisplayPageBreaks プロパティ 印刷したあとや印刷プレビューを表 …

CustomDocumentProperties プロパティ
ユーザー設定のドキュメントプロパティ(CustomDocumentProperties プロパティ)

CustomDocumentProperties プロパティ ユーザー設定のドキ …

ワークシートを参照する(Sheets プロパティ)

Sheets プロパティ Sheets プロパティは、Sheets コレクション …

ウィンドウの位置を入れ替える(ActivatePrevious メソッド、ActivateNext メソッド)

ウィンドウの位置を入れ替える ActivatePrevious メソッド、Act …

Excel
シートを保護・保護したシートを解除する(Protect メソッド・Unprotect メソッド)

Protect メソッド・Unprotect メソッド Protect メソッド …

余白・ヘッダー
印刷:余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin

余白を設定する 余白を設定する単位は、pt(ポイント:約 0.03528 cm) …

スクロールバーの表示・非表示(DisplayHorizontalScrollBar,DisplayVerticalScrollBar)

スクロールバーの表示・非表示の設定 Windows オブジェクト の Displ …

行列番号を含めて印刷(PageSetup.PrintHeadings プロパティ)

PageSetup.PrintHeadings プロパティ PageSetup. …

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

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

背景に画像を表示(SetBackgroundPicture メソッド)

SetBackgroundPicture メソッド SetBackgroundP …