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 vote238 views1 answer
Vbnet convert charatcer to binary
VBA
0 vote225 views1 answer
Excel vba existence of a file
VBA
5 votes244 views1 answer
Xlvba double quotes in string literal
VBA
0 vote243 views1 answer
Default host vbox address
VBA
1 vote225 views1 answer
Excel vba make cell visible
VBA
6 votes255 views1 answer
Excel vba isalpha
VBA
0 vote218 views1 answer
Vba createparameter null
VBA
1 vote219 views1 answer
Excel vba hide zero values
VBA
1 vote222 views1 answer
Vba reverse string
VBA
1 vote236 views1 answer
Add rows to datagridview vb.net
VBA