/VBA/Excel vba first and last row and column in range

Excel vba first and last row and 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 vote379 views1 answer
Programmatically copy data from one workshet to another excel
VBA
0 vote324 views1 answer
Vbs write file
VBA
5 votes365 views1 answer
Vba low word from Long Integer
VBA
0 vote296 views1 answer
Excel vba concatenate range
VBA
11 votes474 views1 answer
Excel vba How to URL encode a string
VBA
0 vote306 views1 answer
Vb.net round to 2 decimal places
VBA
5 votes379 views1 answer
Xlvba double quotes in string literal
VBA
4 votes327 views1 answer
Excel vba Imitating the "IN" operator from python
VBA
0 vote481 views1 answer
Amd64 vs arm64 linux
VBA
0 vote341 views4 answers
How to continue formula in below line in vba code
VBA