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 vote383 views1 answer
Excel vba get column number from column name
VBA
0 vote408 views1 answer
Winforms dark title bar
VBA
3 votes364 views2 answers
Vba date to string
VBA
1 vote318 views1 answer
Textbox find and replace vb
VBA
5 votes382 views1 answer
Excel-vba get integer high byte
VBA
1 vote336 views1 answer
VBA Loop through recordset
VBA
0 vote336 views1 answer
Vba copy file
VBA
0 vote316 views2 answers
Excel vba close without saving
VBA
0 vote335 views1 answer
Vba type
VBA
0 vote333 views1 answer
Vba like with wildcard
VBA