Excel vba裏怎麽設置單元格的內容對齊方式

通過Range對象的HorizontalAlignment屬性設置左右對齊(橫向對齊),?有8個值:

xlLeft:?左對齊

xlCenter:?居中;

xlRight:右對齊;

xlJustify:?兩端對齊

xlDistributed:?分散對齊;

xlFill?:? 填充;

xlCenterAcrossSelection:? 跨列居中;

xlGeneral:常規,?取決於Excel樣式中的"常規樣式"的設置,?壹般文本默認為左對齊,數字默認為右對齊.

通過Range對象的?VerticalAlignment屬性設置上下對齊(縱向對齊),?有5個值:

xlTop: ?居上

xlCenter:?居中;

xlBottom: 居下;

xlJustify:?兩端對齊

xlDistributed:?分散對齊;

示例:

with?ActiveSheet.Range("A1")

.HorizontalAlignment?=?xlCenter

.VerticalAlignment?=?xlCenter

end?with