ListObject.InsertRowRange (Excel)

Retorna um objeto Range que representa a linha de inserção, se houver, de um objeto ListObject especificado. Range de somente leitura.

Se Inserir linha não estiver visível porque a lista está inativa, o objeto Nothing será retornado.

Dim rngInsertRowRange As Range
Set rngInsertRowRange = ActiveCell.ListObject.InsertRowRange