Excel中VBA CurrentRegion是什么意思?
currentRegion 属性返回Range对象,该对象代表当前的区域。当前区域是一个边缘是任意空行和空列组合成的范围。
说明:该属性对于很多操作是很有用的。例如:自动将选定区扩展到包含整个当前区域,如AutoFormat方法。该属性不能用于被保护的工作表。
使用CurrentRegion属性相当于在Excel工作表中选择菜单“编辑—定位”命令,在弹出的“定位”对话框中单击“定位条件”按钮,然后在“定位条件”对话框中选中“当前区域”选项按钮,或者相当于使用Ctrl+Shift+*组合键。
扩展资料
VBA CurrentRegion的典型应用示例:
1、返回指定(或活动)单元格所在区域中标题行的行数
Worksheets("sheet1").Range("H2").Value = _
Worksheets("sheet1").Range("A1").CurrentRegion.ListHeaderRows
2、返回指定(或活动)单元格所在区域的列数
Worksheets("sheet1").Range("H4").Value = _
Worksheets("sheet1").Range("A1").CurrentRegion.Columns.Count
3、返回指定(或活动)单元格所在区域的单元格数
Worksheets("sheet1").Range("H5").Value = _
Worksheets("sheet1").Range("A1").CurrentRegion.Cells.Count
说明
该属性对于很多操作是很有用的。例如:自动将选定区扩展到包含整个当前区域,如AutoFormat方法。
该属性不能用于被保护的工作表。
VBA示例
本示例选定工作表 Sheet1 上的当前区域。
Worksheets("Sheet1").Activate
ActiveCell.CurrentRegion.Select
本示例假定在工作表 Sheet1 中有一个包含标题行的表。本示例选定该表,但不选定标题行。运行本示例之前,活动单元格必须处于该表中。
Set tbl = ActiveCell.CurrentRegion
tbl.Offset(1, 0).Resize(tbl.Rows.Count - 1, _
tbl.Columns.Count).Select