VBA: Remove update links in source data.

[MrActuary]

I have a macro that reads in an array of Excel files then processes each file before moving onto the next with the following code to select the array and open it:

Pth = Application.GetOpenFilename("excel files, *.xls", MultiSelect:=True)

For i = LBound(Pth) To UBound(Pth)
On Error Resume Next
If Pth <> "False" Then Workbooks.Open Pth(i)

Acct = ActiveWorkbook.Name


The problem is that many of the files contained in the Pth(i) array have links to external data sources which pauses the macro with the pop-up "update links" message. Is it possible to insert code that will tell the macro to automatically NOT update links in these external files? I know that Application.DisplayAlerts = False does this, but this seems to only work for the workbook running the macro and not these external files being read in. Any help is appreciated.

 

[Jonmo1]

Try this

If Pth <> "False" Then Workbooks.Open Pth(i), UpdateLinks:=False

Hope that helps...

 

[MrActuary]

Thanks, Jonmo1. I think that should work. I knew it would be something ridiculously simple.

 

[Jonmo1]

No problem...

I'm not sure though, you may need to reset that to TRUE before Saving/Closing that file...

workbooks("x.xls").UpdateLinks = xlUpdateLinksAlways