Range.DirectPrecedents (Excel)

Retorna um objeto Range que representa o intervalo que contém todos os precedentes diretos de uma célula. Pode ser uma seleção múltipla uma união de objetos Range caso haja mais de um precedente. Objeto Range somente leitura.

A propriedade DirectPrecedents só funciona na planilha ativa e não pode rastrear referências remotas.

Dim rngDirectPrecedents As Range
Set rngDirectPrecedents = ActiveCell.DirectPrecedents