関数・メソッド

セルの文字の横位置・縦位置を指定する【HorizontalAlignment/VerticalAlignmentプロパティ】【ExcelVBA】

構文

Object.HorizontalAlignment
Object.VerticalAlignment

HorizontalAlignment・・・・セルの文字位置(横)を指定
VerticalAlignment
・・・・・セルの文字位置(縦)を指定
HorizontalAlignmentプロパティ/VerticalAlignmentプロパティでセルの文字位置を指定します。
指定する定数は以下を参照してください。
 

HorizontalAlignmentで指定する定数

定数説明
xlLeft-4131左詰め
xlCenter-4108中央
xlRight-4152右詰め
xlJustify-4130両端揃え
xlDistributed-4117均等割り付け
xlCenterAcrossSelection7選択範囲内で中央
xlGeneral1標準設定(既定値)
xlFill5繰り返し
VerticalAlignmentで指定する定数
定数説明
xlTop-4160上詰め
xlCenter-4108中央揃え(既定値)
xlBottom-4107下詰め
xlJustify-4130両端揃え
xlDistributed-4117均等割り付け

セルの文字の横位置・縦位置を指定するコードサンプル

Public Sub sample()

    '■セルA1を左詰め、上詰めにする
    Range("A1").HorizontalAlignment = xlLeft
    Range("A1").VerticalAlignment = xlTop

    '■セルB1~C1を中央揃えにする
    Range("B1:C1").HorizontalAlignment = xlCenter
    Range("B1:C1").VerticalAlignment = xlCenter

    '■セルD1~E5を右詰、下揃えにする(Withを使用して)
    With Range("D1:E5")
        .HorizontalAlignment = xlRight
        .VerticalAlignment = xlBottom
    End With
End Sub

注意点

  • 手作業で設定した場合同様、あるプロパティを設定すると他の設定が出来ないケースがあります。 例)均等割り付けの場合、縮小表示(ShrinkToFit)は出来ないなど。

関連記事

コメント

タイトルとURLをコピーしました