In diesem Beispiel wird die Adresse der Zelle angezeigt, die unterhalb der linken oberen Ecke des ersten eingebetteten Diagramms in Sheet1 liegt.
MsgBox "The top left corner is over cell " & _
Worksheets("Sheet1").ChartObjects(1).TopLeftCell.Address