Excel vba first row 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 vote180 views1 answer
Vba cell all borders
VBA
0 vote145 views1 answer
Vba copy paste value only
VBA
0 vote197 views1 answer
Vba excel do not recalculate before save
VBA
0 vote153 views1 answer
Vbscript remove spaces from string
VBA
0 vote149 views2 answers
Delete all controls from list of control vb.net
VBA
0 vote148 views1 answer
Vb net show lines for all axis labels in chart
VBA
0 vote163 views1 answer
Return na vba
VBA
0 vote147 views1 answer
Excel vba chrw max value
VBA
0 vote152 views1 answer
Get current url vb.net
VBA
0 vote162 views1 answer
VBA Sort RossetaCode
VBA