Range.Row (Excel)

Retorna o número da primeira linha da primeira área do intervalo. Long somente leitura.

Dim lngRow As Long
lngRow = ActiveCell.Row