Excel vba first 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 vote113 views1 answer
How to get the value of optionbutton in vba
VBA
0 vote120 views1 answer
Open file dialog in vb.net
VBA
0 vote110 views1 answer
Excel vba current folder
VBA
1 vote121 views1 answer
Shortcut to apply a formula to an entire column in excel
VBA
0 vote122 views1 answer
Vba sheet visible
VBA
0 vote118 views1 answer
Excel protect cells with formulas
VBA
0 vote135 views1 answer
Vba parameter adodb null value
VBA
5 votes123 views1 answer
Excel vba right word from Long Integer
VBA
0 vote124 views1 answer
Reset border color textbox vba
VBA
0 vote107 views1 answer
Excel vba open browser
VBA