【ExcelVBA 印刷】印刷位置をページの中央に設定する方法について教えて！

構文

構文は以下の通りです。

・CenterHorizontallyメソッド

PageSetup.CenterHorizontally = True / False

このメソッドは、印刷時にシートのコンテンツを水平方向にセンタリングするために使用します。

・CenterVerticallyメソッド

PageSetup.CenterVertically = True / False

このメソッドは、印刷時にシートのコンテンツを垂直方向にセンタリングするために使用します。

解説

「PageSetup.CenterHorizontally」および「PageSetup.CenterVertically」は、Excelの印刷設定（Page Setup）を操作するためのメソッドです。これらのメソッドは、印刷時にシートのコンテンツを水平方向または垂直方向にセンタリングするために使用します。「True」を指定すると、センタリングが有効化されます。一方、「False」を指定すると、センタリングは無効化されます。

使い方

・水平方向のセンタリングをする場合

ps.CenterHorizontally = True

・垂直方向のセンタリングをする場合

ps.CenterVertically = True

これらのプロパティをTrueに設定すると、対応する方向にコンテンツがセンタリングされます。Falseに設定すると、センタリングは解除されます。

プログラミング例

以下に、具体的なプログラム例を示します。

Sub CenterContent()
    Dim ps As PageSetup
    Set ps = Worksheets("Sheet1").PageSetup
    ' 水平方向のセンタリング
    ps.CenterHorizontally = True
    ' 垂直方向のセンタリング
    ps.CenterVertically = True
End Sub

上記の例では、"Sheet1"という名前のシートのコンテンツが印刷時に水平方向および垂直方向にセンタリングされます。

まとめ

「PageSetup.CenterHorizontally」および「PageSetup.CenterVertically」は、印刷設定を操作するための便利なメソッドです。これらを使用することで、シートのコンテンツを印刷時に簡単にセンタリングすることができます。是非活用してください。