How do I Return Range Or Chartname of Linked Object

[taylor.bryant]

Is there a vba equivalent of the function Edit|Links|Change Source|Item
(Set Item dialogue)?


I would like to be able to read (and write) the range or chart name of
excel tables and charts I have linked to in my word document. I can use
SourceName or SourceFullName to return the name/path&name of the linked
file, but I can't seem to figure out how to get any more info.

e.g. "Debug.Print
ActiveDocument.Shapes("Chart1").LinkFormat.SourceName" returns
"Workbook1.xls"

"Debug.Print
ActiveDocument.Shapes("Table17").LinkFormat.SourceFullName" returns
"C:\Project\Workbook1.xls"


I want to know that "ActiveDocument.Shapes("Chart1")" is linked to the
chart "C:\Project\Workbook1.xls!Profits"
I want to know that "ActiveDocument.Shapes("Table17")" is linked to the
range "C:\Project\Workbook1.xls!Worksheet1!R1C1:R20C17"

How do I do this in VBA?

Thanks for any insights.

Taylor