VBA(マクロ)

[ExcelVBA]マクロで文字の配置を変更する / Alignment

ExcelVBA(マクロ)

マクロでセル内の文字の配置を設定するサンプルコード

以下はExcelの文字の配置(中央揃え・左揃え・右揃え・上揃え・下揃え・上下中央揃え)を指定するサンプルコードです。

Excelではボタンや「セルの書式設定」の配置タブで設定する内容です。

マクロではなく、Excelでの操作は「Excelの文字の配置変更」を参考にしてください。

横方向の文字の配置の設定(HorizontalAlignment)

文字の中央揃え・左揃え・右揃え

左揃え(xlLeft)

以下の内容をコードに入力・実行すると、セルA3の文字が左揃えに設定されます。

Sub 左揃え()
    Range("A3").HorizontalAlignment = xlLeft           '左揃え
End Sub

 

中央揃え(lCenter)

以下の内容をコードに入力・実行すると、セルA3の文字が中央揃えに設定されます。

Sub 中央揃え()
    Range("A3").HorizontalAlignment = xlCenter           '中央揃え
End Sub

 

右揃え(xlRight)

以下の内容をコードに入力・実行すると、セルA3の文字が右揃えに設定されます。

Sub 右揃え()
    Range("A3").HorizontalAlignment = xlRight           '右揃え
End Sub

 

縦方向の文字の配置の設定(VerticalAlignment)

文字の上下中央揃え・上揃え・下揃え

上揃え(xlTop)

以下の内容をコードに入力・実行すると、セルA3の文字が上揃えに設定されます。

Sub 上揃え()
    Range("A4").VerticalAlignment = xlTop           '上揃え
End Sub

 

中央揃え(xlCenter)

以下の内容をコードに入力・実行すると、セルA3の文字が中央揃えに設定されます。

Sub 中央揃え()
    Range("A4").VerticalAlignment = xlCenter           '中央揃え
End Sub

 

下揃え(xlBottom)

以下の内容をコードに入力・実行すると、セルA3の文字が下揃えに設定されます。

Sub 下揃え()
    Range("A4").VerticalAlignment = xlBottom           '下揃え
End Sub

 

文字の方向(文字の向き)や回転を設定するOrientationの指定は以下の記事をご覧ください。

ExcelVBA(マクロ)
[ExcelVBA]マクロで文字を縦書き、横書きにする / OrientationExcel VBA(マクロ)で、セル内の文字を縦書きにする、横書きなどの文字の方向を設定するOrientationプロパティのサンプルコードです。...