Relink Excel Objects

H

Holger Gerths

Hi,

I want to relink an OLE-linked Excel - cell-range in PPT after the Excel
Workbook has been moved.

I try this way:

Sub Relink()
'assume that the excel file is in the ppt-folder
ActivePresentation.Slides(1).Shapes(1).LinkFormat.SourceFullName =
ActivePresentation.Path & "MyExcelWorkbook.xls!MySheet!R2C2:R13C6"
ActivePresentation.Slides(1).Shapes(1).LinkFormat.Update
End Sub

The result is that the whole worksheet is linked, not the specified
cell-area. Any idea?

Thanks in advance.
 
Top