/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 vote215 views1 answer
Vb.net round to 2 decimal places
VBA
4 votes227 views2 answers
Excel vba last column with data
VBA
0 vote218 views1 answer
Vb net dgv doesn't keep currency format
VBA
0 vote217 views1 answer
Vba change named range address
VBA
1 vote244 views1 answer
Vba optional
VBA
0 vote212 views1 answer
Excel vba milliseconds
VBA
0 vote225 views1 answer
Make your computer talk vbscript
VBA
5 votes246 views1 answer
Vba low byte from INTEGER
VBA
2 votes211 views2 answers
Excel vba copy values range to another range
VBA
0 vote288 views1 answer
Excel vba protect worksheet without password
VBA