ListObject.Range (Excel)

Retorna um objeto Range que representa o intervalo ao qual o objeto de lista especificado na lista se aplica.

Dim rngRange As Range
Set rngRange = ActiveCell.ListObject.Range