Excel Macro - Auto Update Links

[joopdog]

I have this piece of Code:


Code:
--------------------
Sub auto_open()
' For Auto Updating Linked Files
'---
'Workbooks.Open Filename:=ActiveWorkbook.Path & "\Test_file_02.xls", UpdateLinks:=1
'---
End Sub
--------------------


When I run this code from "File 1" everything updates automatically,
great.
However, "File 2" remains open. Is there away to close the file?

Any help would be appreciated.

 

[dbarelli]

Try adding this line at the end:

ActiveWorkbook.Close True

Regards.

 

[joopdog]

Thanks!

It works great!


Code:
--------------------
Sub auto_open()
' For Auto Updating Linked Files
Application.ScreenUpdating = False
Workbooks.Open Filename:=ActiveWorkbook.Path & "\Test_file_02.xls", UpdateLinks:=1
ActiveWorkbook.Close True
Application.ScreenUpdating = True
End Sub
--------------------


It updates without a flicker. "Test_file_02.xls" closes when "File 1"
opens to run the "auto_open" macro. You can move the files from folder
to folder without a hitch. It works great.

Again Thanks alot.