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 vote124 views3 answers
Write to text file vb.net
VBA
1 vote969 views1 answer
Vba Remove Case Sensitivity
VBA
3 votes140 views1 answer
Excel vba get the workbook full filename with path
VBA
0 vote79 views1 answer
How to make a if statement with vbs
VBA
0 vote132 views1 answer
Remove series name from legendvbnet
VBA
1 vote124 views1 answer
Add control vb
VBA
0 vote126 views1 answer
Telephon call in vba
VBA
0 vote127 views1 answer
Excel vba prevent saving workbook
VBA
0 vote122 views1 answer
Vbscript for loop
VBA
4 votes119 views1 answer
Excel vba determine number of elements in an array
VBA