大家好，今天小悦来为大家解答以上问题。HorizontalAlignment，VerticalAlignment很多人还不知道，现在让我们一起来看看吧！

水平对齐方式的值(默认值=xlGeneral)，当然，还有其它的对齐方式如下：

常量 水平位置

xlGeneral 标准

xlLeft 靠左

xlCenter 中央

xlRight 靠右

xlFill 填充

xlJustify 调节对齐

xlCenterAcrossSelection 选择范围内中央对齐

xlDistributed 平均对齐

而垂直对齐方式的值(默认值=xlCenter)，同样，它也有其它的对齐方式如下：

常量 垂直位置

xlTop 靠上

xlCenter 中央

xlBottom靠下

xlFill 填充

xlJustify 调节对齐

xlDistributed 平均对齐

①例子

Dim range1 As Range

Set range1 = Range("A1")

range1.HorizontalAlignment = xlCenter

range1.VerticalAlignment = xlTop

②例子

Range("A1:C4").Value ="文言文"

Range("A1:C1").HorizontalAlignment = xlLeft

Range("A2:C2").HorizontalAlignment = xlCenter

Range("A3:C3").HorizontalAlignment = xlRight

Range("A4:C4").HorizontalAlignment = xlDistributed

Range("A1:A4").VerticalAlignment = xlTop

Range("B1:B4").VerticalAlignment = xlCenter

Range("C1:C4").VerticalAlignment = xlBottom

本文到此结束，希望对大家有所帮助。