I'm trying to update links but getting the following error:

Dim xlapp1 As New Excel.Application
Dim xlbook1 As New Excel.Workbook

Set xlbook1 = xlapp1.Workbooks.Open(strFileName)

With xlbook1

.UpdateLink Name:=xlbook1.LinkSources ' error

End With

Error: "Error number 1004: Application-defined object-
defined error"

Could anybody help me with this?

Thanks