/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

1 vote135 views1 answer
Excel vba array remove first
VBA
1 vote125 views1 answer
Excel vba convert cells(1,1) into A1 and vice versa
VBA
0 vote129 views1 answer
Check if cell is dbnullvb.net
VBA
0 vote125 views1 answer
Move bindingnavigator vb
VBA
0 vote127 views1 answer
Select case vba
VBA
0 vote123 views1 answer
Excel vba move down to next visible cell
VBA
0 vote130 views1 answer
VBA is form loaded
VBA
4 votes138 views1 answer
Excel vba how to programmatically remove the marching ants after range copy
VBA
0 vote117 views1 answer
Vbnet check if sting contians symbols
VBA
1 vote119 views1 answer
Excel vba close form escape key
VBA