Excel vba last 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

4 votes369 views2 answers
Vba last row
VBA
1 vote373 views1 answer
Vba optional
VBA
0 vote364 views1 answer
Change form background image vb
VBA
1 vote353 views1 answer
S yyyy-MM-dd HH:mm:ss Short Date Local
VBA
0 vote363 views1 answer
Selecttoken em vbnet e json
VBA
0 vote358 views1 answer
Convert number to minutes in vba
VBA
0 vote337 views1 answer
Open application from vbnet
VBA
0 vote370 views1 answer
Excel last used row
VBA
0 vote335 views1 answer
How to carry text to the next line in a label in vb.net
VBA
0 vote349 views1 answer
Change whcih control a user has selected vb
VBA