VBA CurrentRegion

单元格的当前区域：指单元格的上下左右四个方向，分别向外遇到空行空列截止的区域。

非常有用的一个属性。我们经常会通过它来进一步计算工作表中实际录入数据的行数。

示例

A1、A2、A3、B2、B3、B4，这六个单元格的当前区域相同，都是所如图中所选区别。

通过选中查看A1、A2、A3三个单元格的当前区域。

Sub sub7()

  Dim ws As Worksheet
  Set ws = Workbooks.Item("小步教程1.xlsx").Worksheets.Item("Sheet1")
  Dim r As Range


  Set r = ws.Range("A1")
  r.CurrentRegion.Select

  'Set r = ws.Range("A2")
  'r.CurrentRegion.Select

  'Set r = ws.Range("A3")
  'r.CurrentRegion.Select

End Sub

❮上一节 VBA Range 常用操作下一节 VBA Range的遍历❯

第08章 VBA Excel对象

VBA CurrentRegion

VBA 教程