/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 vote138 views1 answer
Visual stuiod not recognising desgined labels
VBA
0 vote133 views1 answer
Pivot data source not accepting table named range vba
VBA
0 vote115 views2 answers
Excel vba prevent save
VBA
22 votes252 views1 answer
Excelvba check for directory
VBA
20 votes276 views1 answer
Excel vba factorial
VBA
-1 vote149 views1 answer
How save excel through visual basic
VBA
0 vote128 views2 answers
Excel vba number format file size
VBA
0 vote119 views1 answer
Vba add shape oval
VBA
0 vote123 views1 answer
Vbnet access System.InvalidOperationException: 'Update requires a valid UpdateCommand when passed DataRow collection with modified rows.'
VBA
0 vote123 views1 answer
Excel vba protect sheet
VBA