Returns a Range object that represents the cell that lies under the upper-left corner of the specified object. Read-only.
Example
This example displays the address of the cell beneath the upper-left corner of embedded chart one on Sheet1.
MsgBox "The top left corner is over cell " & _
Worksheets("Sheet1").ChartObjects(1).TopLeftCell.Address