Range.EntireRow (Excel)

Returns a Range object that represents the entire row (or rows) that contains the specified range.

Dim rngEntireRow As Range
Set rngEntireRow = ActiveCell.EntireRow