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

  関連記事

Saved メソッド
ブックの変更が保存されているかを確認する(Saved プロパティ)

ブックの変更が保存されているかを確認する(Saved プロパティ) Saved …

EnableEvents プロパティ
イベントの発生・無効をコントロール(EnableEvents プロパティ)

EnableEvents プロパティ EnableEvents プロパティに T …

DefaultSaveFormat プロパティ
ファイル保存の既定の形式を取得・設定(DefaultSaveFormat プロパティ)

DefaultSaveFormat プロパティ DefaultSaveForma …

印刷設定(フッターに画像を指定)LeftFooterPicture,CenterFooterPicture,RightFooterPicture

フッターに画像を表示するには LeftFooterPicture プロパティ、C …

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

DisplayFullScreen プロパティ DisplayFullScree …

ページ数に合わせて印刷(FitToPagesTall, FitToPagesWide)

PageSetup.FitToPagesTall プロパティ PageSetup …

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

PrecisionAsDisplayed プロパティ PrecisionAsDi …

ブックの表示・非表示(Visible プロパティ)

ブック表示・非表示(Visible プロパティ) ブック(ウィンドウ)が表示され …

印刷品質設定の例
印刷品質を設定(PageSetup.PrintQuality プロパティ)

PageSetup.PrintQuality プロパティ PageSetup.P …

シート見出しの表示・非表示(DisplayWorkbookTabs プロパティ)

シート見出しの表示・非表示(DisplayWorkbookTabs プロパティ) …