[VBA] 设置行高和列宽，以及全选单元格

2024-07-16 21:34| 来源: 网络整理| 查看: 265

一、用VBA设置行高和列宽

　　1、将选定区域内各单元格的行高和列宽设置为指定的数值：

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

　　2、将选定区域内各单元格的行高和列宽调整为最合适的值：

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

　　3、将活动工作表中的所有单元格的行高和列宽恢复为默认值：

Sub SetDefault() With ActiveSheet .Columns.ColumnWidth = .StandardWidth .Rows.RowHeight = .StandardHeight End 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

【本文地址】

今日新闻