一、用VBA設置行高和列寬

　　1、將選定區域內各單元格的行高和列寬設置為指定的數值：??

Sub SetSpecified()With ActiveWindow.RangeSelection.ColumnWidth = 2.RowHeight = 10End With End Sub

　　2、將選定區域內各單元格的行高和列寬調整為最合適的值：??

Sub SetAutoFit()With ActiveWindow.RangeSelection.Columns.AutoFit.Rows.AutoFitEnd With End Sub

　　3、將活動工作表中的所有單元格的行高和列寬恢復為默認值：??

Sub SetDefault()With ActiveSheet.Columns.ColumnWidth = .StandardWidth.Rows.RowHeight = .StandardHeightEnd With End Sub

?二、用VBA全選單元格

　　1、選擇所有單元格（Cells是所有單元格的集合）

Sub SelectAllCells()Cells.Select End Sub

　　2、選擇所有行（Rows是所有行的集合）

Sub SelectAllRows()Rows.Select End Sub

　　3、選擇所有列（Columns是所有列的集合）

Sub SelectAllColumns()Columns.Select End Sub

轉載于:https://www.cnblogs.com/russellluo/archive/2011/10/11/2207925.html

總結

以上是生活随笔為你收集整理的[VBA] 设置行高和列宽，以及全选单元格的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。