文字表示の垂直位置(縦位置)を設定

文字表示の垂直位置(縦位置)を設定する。

VBAでセルに入力された文字の垂直方向(縦)の表示位置を設定するにはRangeオブジェクトのVerticalAlignmentプロパティを利用して文字列の表示位置を設定することができます。

VerticalAlignmentプロパティで設定できるものは下記の5種類があり、設定する値は定数で設定することができます。
 ・上揃え
 ・下詰め
 ・中央揃え
 ・均等割り付け
 ・両端揃え

'******************************************************************
' 文字表示の垂直位置(縦位置)を設定
'******************************************************************
Sub Main_VerticalAlignment()
    
    '上詰え
    Sheets("Sheet1").Range("A1").VerticalAlignment = xlVAlignTop
    
    '下詰め
    Sheets("Sheet1").Range("A2").VerticalAlignment = xlVAlignBottom
    
    '中央揃え
    Sheets("Sheet1").Range("A3").VerticalAlignment = xlVAlignCenter
    
    '均等割り付け
    Sheets("Sheet1").Range("A4").VerticalAlignment = xlVAlignDistributed
    
    '両端揃え
    Sheets("Sheet1").Range("A5").VerticalAlignment = xlVAlignJustify
    
End Sub

 ■実行結果