Excel vba last row of 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

-1 vote178 views2 answers
Excel vba delete empty rows
VBA
1 vote171 views1 answer
Excel vba saveas force overwrite
VBA
0 vote177 views1 answer
Excel vba unlock sheet without password
VBA
0 vote179 views1 answer
Vba get workbook name
VBA
0 vote177 views1 answer
Get current url vb.net
VBA
0 vote176 views1 answer
Vlookup columns not next to each other
VBA
1 vote177 views1 answer
Excel vba Run a Macro every time sheet is changed
VBA
0 vote190 views1 answer
How to get value from clipboard in vbnet
VBA
1 vote172 views1 answer
Sort using vba
VBA
-1 vote177 views1 answer
VBA check if a cell contains a letter or string
VBA