vb 怎样控制电子表格的格式

[hrex]

vb怎样控制excel每列的对齐方式，不是每个单元的？

[Hassle]

With oSheet.Columns("C:C")
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With

[Dunzip]

楼上的代码可以解决你的问题。

[zzd8310]

同意沙发

[happy_sea]

With oSheet.Columns("C:C") '对oSheet这个工作表的"C:C"列进行操作
.HorizontalAlignment = xlCenter '水平对齐方式：居中
.VerticalAlignment = xlCenter '垂直对齐方式：居中
End With

水平对齐还可以是xlLeft(靠左)、xlRight(靠右)