I've got 2 excel workbooks - lets call them "Data" and "Control" - and
try to break all external links in the Data file from within the
Control file. In the Control file I've created following a function:
Private Function BreakLinks()
aLinks = Workbooks("Data.xls").LinkSources(xlLinkTypeExcelL inks)
If Not IsEmpty(aLinks) Then
For i = 1 To UBound(aLinks)
Workbooks("Data.xls").BreakLink(aLinks(i), xlLinkTypeExcelLinks)
Next i
End If
End Function
This code produces the error message: "Compile error, Expected: =".
When I changed that line to
Workbooks("Data.xls").BreakLink Name:=aLinks(i),
Type:=xlLinkTypeExcelLinks
the compiler didn't report an error, however when I try to execute the
code it comes up with the error: run-time error'1004', Method
'BreakLink' of object '_Workbook' failed"
Any idea what in either case the problem could be?
Thanks in advance...
--
Gop
------------------------------------------------------------------------
Gop's Profile:
http://www.excelforum.com/member.php...o&userid=26872
View this thread:
http://www.excelforum.com/showthread...hreadid=401093