HOME > 即効テクニック > Excel VBA > ページ設定関連のテクニック > ページ中央に印刷する(CenterHorizontally/CenterVerticallyプロパティ)

ページ中央に印刷する(CenterHorizontally/CenterVerticallyプロパティ)|Excel VBA

ページ設定関連のテクニック

ページ中央に印刷する(CenterHorizontally/CenterVerticallyプロパティ)

(Excel 2000/2002/2003/2007/2010/2013)

PageSetupオブジェクトのCenterHorizontallyプロパティにTrueを設定すると、余白を除いた範囲内で水平方向の中央寄せに設定します。
CenterVerticallyプロパティは垂直方向の中央寄せに設定します。

構文  Object.CenterHorizontally     水平方向でページ中央 設定/取得
      Object.CenterVertically       垂直方向でページ中央 設定/取得
設定項目 内容
ObjectPageSetupオブジェクト [省略不可]

次のサンプルは、アクティブシートのページ設定を、水平/垂直方向ともに中央寄せにしてページ中央に印刷するように設定し、印刷プレビューを表示します。

●サンプル●

Sub Sample()
    With ActiveSheet.PageSetup
        .CenterHorizontally = True    '---水平方向で中央寄せ
        .CenterVertically = True      '---垂直方向で中央寄せ
    End With
    ActiveSheet.PrintPreview          '---印刷プレビューを表示
End Sub