CurrentRegion Property Example
This example selects the current region on Sheet1.
Worksheets("Sheet1").Activate
ActiveCell.CurrentRegion.Select
This example assumes that you have a table on Sheet1 that has a header row. The example selects the table, without selecting the header row. The active cell must be somewhere in the table before you run the example.
Set tbl = ActiveCell.CurrentRegion
tbl.Offset(1, 0).Resize(tbl.Rows.Count - 1, _
tbl.Columns.Count).Select