Option Explicit
Sub test()
Sheet1.Range("a:b").ColumnWidth = 14 '设置A,B列为14像素宽
Sheet1.Columns(3).ColumnWidth = 15 '设置c列为15像素宽
Sheet1.Columns("d:e").ColumnWidth = 20 '设置d,e列为20像素宽
End Sub这个可以自己录制个宏就知道啦
excel中vba设置列宽的方法是调用列对象的ColumnWidth方法:
比如设置A、B、C的列宽分别为8,6和10,写法如下:
Columns("A").ColumnWidth
=
8
Columns("B").ColumnWidth
=
6
Columns("C").ColumnWidth
=
10
效果如图:
设置前:
设置后:
手机WPS表格中怎么设置行高列宽呢,非常简单粗暴搞定