VBA(マクロ)

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

ExcelVBA(マクロ)
Excel2

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

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

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

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

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

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

左揃え(xlLeft)

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

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

中央揃え(lCenter)

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

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

右揃え(xlRight)

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

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

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

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

上揃え(xlTop)

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

1Sub 上揃え()
2    Range("A4").VerticalAlignment = xlTop           '上揃え
3End Sub
4

中央揃え(xlCenter)

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

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

下揃え(xlBottom)

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

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

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

あわせて読みたい
[ExcelVBA]マクロで文字を縦書き、横書きにする / Orientation
[ExcelVBA]マクロで文字を縦書き、横書きにする / Orientation
記事URLをコピーしました