来源：互联网
1、currentRegion 属性返回Range对象，该对象代表当前的区域。
2、当前区域是一个边缘是任意空行和空列组合成的范围。
3、说明：该属性对于很多操作是很有用的。
【资料图】
4、例如：自动将选定区扩展到包含整个当前区域，如AutoFormat方法。
5、该属性不能用于被保护的工作表。
6、使用CurrentRegion属性相当于在Excel工作表中选择菜单“编辑—定位”命令，在弹出的“定位”对话框中单击“定位条件”按钮，然后在“定位条件”对话框中选中“当前区域”选项按钮，或者相当于使用Ctrl+Shift+*组合键。
7、扩展资料VBA CurrentRegion的典型应用示例：返回指定(或活动)单元格所在区域中标题行的行数Worksheets("sheet1").Range("H2").Value = _Worksheets("sheet1").Range("A1").CurrentRegion.ListHeaderRows2、返回指定(或活动)单元格所在区域的列数Worksheets("sheet1").Range("H4").Value = _Worksheets("sheet1").Range("A1").CurrentRegion.Columns.Count3、返回指定(或活动)单元格所在区域的单元格数Worksheets("sheet1").Range("H5").Value = _Worksheets("sheet1").Range("A1").CurrentRegion.Cells.CountcurrentRegion 属性返回Range对象，该对象代表当前的区域。
8、当前区域是一个边缘是任意空行和空列组合成的范围。
9、只读。
10、说明该属性对于很多操作是很有用的。
11、例如：自动将选定区扩展到包含整个当前区域，如AutoFormat方法。
12、该属性不能用于被保护的工作表。
13、VBA示例本示例选定工作表 Sheet1 上的当前区域。
14、Worksheets("Sheet1").ActivateActiveCell.CurrentRegion.Select本示例假定在工作表 Sheet1 中有一个包含标题行的表。
15、本示例选定该表，但不选定标题行。
16、运行本示例之前，活动单元格必须处于该表中。
17、Set tbl = ActiveCell.CurrentRegiontbl.Offset(1, 0).Resize(tbl.Rows.Count - 1, _ tbl.Columns.Count).Select。
本文到此分享完毕，希望对大家有所帮助。
标签：
