ChartObject.TopLeftCell (Excel)

Retorna um objeto Range que representa a célula que está sob o canto superior esquerdo do objeto especificado. Somente leitura.

Dim rngTopLeftCell As Range
Set rngTopLeftCell = ActiveSheet.ChartObjects(1).TopLeftCell