Open and update spreadsheet

[lynxbci]

Hi,
I have the following code to open and update a spreadsheet, that is linked to another source. No changes are being made, just simply opening, updating links and saving.

Dim xl As Excel.Application
Dim wb As Excel.Workbook
Set xl = New Excel.Application
xl.DisplayAlerts = False
xl.Visible = False
Set wb = xl.Workbooks.Open("J:\Ops\QC\Transfer.xlsx", UpdateLinks:=1)
wb.Close savechanges = True
Set xl = Nothing

This code functions, but doesn't update links, just opens, and saves...
What have i missed out?

Thanks in advance

 

[vbaInet]

It's UpdateLinks:=3

 

[lynxbci]

Thanks, but it still doesn't work, opens the spreadsheet, but isn't updating it before saving. The reason it needs to update is that it is linked to another file. Any other suggestions?

 

[vbaInet]

Try putting wb.Save before wb.Close.

And if you do it manually do the links get updated?

 

[lynxbci]

Seems to have sorted it, such a smiple thing.

Thanks very much for the support

 

[vbaInet]

You're welcome!