文字表示の水平位置(横位置)を設定する。

VBAでセルに入力された文字の水平方向（横）の表示位置を設定するにはRangeオブジェクトのHorizontalAlignment プロパティを利用して表示位置を設定することができます。

HorizontalAlignment プロパティで設定できるものは下記の8種類があり、設定する値は定数で設定することができます。
　・標準
　・左詰め
　・右詰め
　・中央揃え
　・繰り返し
　・選択範囲内で中央
　・均等割り付け
　・両端揃え

'******************************************************************
'　文字表示の水平位置(横位置)を設定
'******************************************************************
Sub Main_HorizontalAlignment()
    
    '標準
    Sheets("Sheet1").Range("A1").HorizontalAlignment = xlHAlignGeneral
    
    '左詰め
    Sheets("Sheet1").Range("A2").HorizontalAlignment = xlHAlignLeft
    
    '右詰め
    Sheets("Sheet1").Range("A3").HorizontalAlignment = xlHAlignRight
    
    '中央揃え
    Sheets("Sheet1").Range("A4").HorizontalAlignment = xlHAlignCenter
        
    '繰り返し
    Sheets("Sheet1").Range("A5").HorizontalAlignment = xlHAlignFill
    
    '選択範囲内で中央
    Sheets("Sheet1").Range("A6:D6").HorizontalAlignment = xlHAlignCenterAcrossSelection
    
    '均等割り付け
    Sheets("Sheet1").Range("A7").HorizontalAlignment = xlHAlignDistributed
    
    '両端揃え
    Sheets("Sheet1").Range("A8").HorizontalAlignment = xlHAlignJustify
    
End Sub

　■実行結果