vbscript 行和列高度 - Excel（VBA）

Posted 2021-05-21

Sub sbAutoAdjustColumnRowWidth()
'Auto ColumnFit
Columns(2).AutoFit
'Auto RowFit
Rows(2).AutoFit
End Sub

Sub sbChangeColumnWidth()
'Changing Columns B's Width
Columns("B").ColumnWidth = 25

'Changing the B-E Column Width
Columns("B:E").ColumnWidth = 25
End Sub

Sub sbChangeRowHeight()
'Changing the 3rd row Height
Rows(3).RowHeight = 25

'Changing the 3rd-25the row Height
Rows("4:25").RowHeight = 25

End Sub