/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 vote210 views1 answer
Afficher un message d'erreur vba
VBA
0 vote224 views1 answer
Convert Seconds to HH:MM:SS in VB.Net
VBA
2 votes202 views2 answers
Constructor vb.net
VBA
1 vote240 views1 answer
Vba optional
VBA
0 vote204 views1 answer
Excel vba disable alerts
VBA
0 vote228 views1 answer
Reset border color textbox vba
VBA
31 votes473 views1 answer
Excel-vba how to convert a column number into an excel column
VBA
0 vote204 views1 answer
Excel vba populate array with cell values
VBA
0 vote212 views1 answer
Vba nested dictionary
VBA
0 vote215 views1 answer
Not allow form to be resized
VBA