ExcelWork.info

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

印刷:余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin

      2015/10/16

余白を設定する

余白を設定する単位は、pt(ポイント:約 0.03528 cm)です。上下左右のほかヘッダー、フッターの余白を設定することができます。(TopMargin プロパティ、BottomMargin プロパティ、LeftMargin プロパティ、RightMargin プロパティ、HeaderMargin プロパティ、FooterMargin プロパティ)

余白・ヘッダー

Excel の「ページ設定」ダイアログボックスの [余白] タブで設定できる各項目の単位は、cm(センチメートル)です。余白をセンチメートル単位で設定するには、Application.CentimetersToPoint メソッド を使用します。また、インチ単位で設定するには、Application.InchesToPoint メソッド を使用します(ポイント単位の値に変換する を参照)。


上下の余白を設定(TopMargin プロパティ・BottomMargin プロパティ)


【書式】

<上余白 取得>
object.PageSetup.TopMargin

<上余白 設定>
object.PageSetup.TopMargin = top_double

<下余白 取得>
object.PageSetup.BottomMargin

<下余白 設定>
object.PageSetup.BottomMargin = bot_double


引数・戻り値

  • object  ・・・  対象となる Worksheet オブジェクト を指定します。
  • top_double  ・・・  上余白を pt(ポイント)単位の値で指定します。値は、倍精度浮動小数点型(Double)を使用します。
  • bot_double  ・・・  下余白を pt(ポイント)単位の値で指定します。値は、倍精度浮動小数点型(Double)を使用します。

左右の余白を設定(LeftMargin プロパティ・RightMargin プロパティ)


【書式】

<左余白 取得>
object.PageSetup.LeftMargin

<左余白 設定>
object.PageSetup.LeftMargin = right_double

<右余白 取得>
object.PageSetup.RightMargin

<右余白 設定>
object.PageSetup.RightMargin = left_double


引数・戻り値

  • object  ・・・  対象となる Worksheet オブジェクト を指定します。
  • right_double  ・・・  左余白を pt(ポイント)単位の値で指定します。値は、倍精度浮動小数点型(Double)を使用します。
  • left_double  ・・・  右余白を pt(ポイント)単位の値で指定します。値は、倍精度浮動小数点型(Double)を使用します。

ヘッダー・フッターの余白を設定(HeaderMargin プロパティ・FooterMargin プロパティ)


【書式】

<ヘッダー余白 取得>
object.PageSetup.HeaderMargin

<ヘッダー余白 設定>
object.PageSetup.HeaderMargin = head_double

<フッター余白 取得>
object.PageSetup.FooterMargin

<フッター余白 設定>
object.PageSetup.FooterMargin = foot_double


引数・戻り値

  • object  ・・・  対象となる Worksheet オブジェクト を指定します。
  • head_double  ・・・  ヘッダーの余白を pt(ポイント)単位の値で指定します。値は、倍精度浮動小数点型(Double)を使用します。
  • foot_double  ・・・  フッターの余白を pt(ポイント)単位の値で指定します。値は、倍精度浮動小数点型(Double)を使用します。

PageSetup.AlignMarginsHeaderFooter プロパティ

ヘッダーまたはフッターの余白をワークシートの左右の余白に合わせるには、PageSetup.AlignMarginsHeaderFooter プロパティ に、True を指定します。値の取得および設定が可能です。ブール型(Boolean)の値を使用します。


【書式】

<取得>
object.PageSetup.AlignMarginsHeaderFooter

<設定>
object.PageSetup.AlignMarginsHeaderFooter = boolean


引数・戻り値

  • object  ・・・  対象となる Worksheet オブジェクト を指定します。
  • boolean  ・・・  True または、False を指定します。


余白を設定する例

サンプルVBAソース


実行結果

サンプルVBAソースを実行後に「ページ設定」の「余白」タブを確認

印刷 余白の設定例


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

Message

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

  関連記事

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

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

選択されているシートを参照
選択されているシートを参照する(SelectedSheets プロパティ)

SelectedSheets プロパティ 選択されているすべてのシートをあらわす …

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

DefaultSaveFormat プロパティ DefaultSaveForma …

印刷時のページの番号付けの方向を設定(PageSetup.Order プロパティ)

PageSetup.Order プロパティ PageSetup.Order プロ …

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

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

印刷位置を中央に設定(CenterHorizontally, CenterVertically)

PageSetup.CenterHorizontally プロパティ PageS …

アクティブシートを参照する(ActiveSheet プロパティ)

アクティブなワークシートを参照する ActiveSheet プロパティを使用する …

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

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

WorksheetView オブジェクト

WorkSheetView オブジェクト 行列番号や枠線の表示・非表示の設定など …

セルのコメントを印刷(PageSetup.PrintComments プロパティ)

PageSetup.PrintComments プロパティ PageSetup. …