/VBA/Excel vba first and last row and column in range

Excel vba first and last row and column in range

Dim rRange As Range
Dim rDuplicate As Range

Set rRange = ActiveSheet.UsedRange
lFirstRow = rRange.Row
lLastRow = rRange.Rows.Count + rRange.Row - 1
lFirstColumn = rRange.Column
lLastColumn = rRange.Columns.Count + rRange.Column - 1
' New reference to current range (can be truncated)
Set rDuplicate = Range(Cells(lFirstRow, lFirstColumn), _
      Cells(lLastRow, lLastColumn))

Similar codes

0 vote202 views1 answer
Remove series name from legendvbnet
VBA
2 votes186 views2 answers
Excel vba copy values range to another range
VBA
3 votes188 views1 answer
Vba make long from two shorts
VBA
31 votes242 views1 answer
Excel-vba how to convert a column number into an excel column
VBA
0 vote202 views1 answer
Excel vba protect shapes
VBA
1 vote213 views1 answer
Excel vba Refreshing all pivot tables in workbook
VBA
0 vote193 views2 answers
Get excel file from email attachment in vba
VBA
1 vote199 views1 answer
Vb.net get name by Selection Changed
VBA
0 vote181 views1 answer
Vba declare 64-bit ptrsafe
VBA
0 vote193 views1 answer
Excel vba unlock sheet without password
VBA