VBA HorizontalAlignment

Range.HorizontalAlignment = XlHAlign_code
'Possible values for XlHAlign_code
'    xlHAlignCenter
'    xlHAlignCenterAcrossSelection
'    xlHAlignDistributed	
'    xlHAlignFill
'    xlHAlignGeneral
'    xlHAlignJustify
'    xlHAlignLeft
'    xlHAlignRight
VasteMonde