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(xlLinkTypeExcelLinks)
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...