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 vote170 views1 answer
Refresh token em vb net
VBA
0 vote194 views2 answers
Get unique random number in vb.net
VBA
0 vote235 views1 answer
Vba array of integers
VBA
0 vote169 views1 answer
Discern between file and folder given path vb.net
VBA
0 vote162 views1 answer
Find the name of the last excel sheet vb
VBA
25 votes249 views3 answers
String to date vb
VBA
0 vote180 views1 answer
Vba extract filename from path
VBA
15 votes235 views2 answers
Xl vba dynamic string array
VBA
0 vote171 views1 answer
Excel vba hide gridlines
VBA
0 vote180 views1 answer
Remove last 8 characters from string vb
VBA