Macro to open workbooks then update, then close

[steallan]

Hi.

Hope someone can help me with the following small problem. We've got a workbook, links to three other workbooks, but the data wont refresh through the links. When we open the three workbooks manually, then hit refrest all, the data does update.

My friend has had a good search for a solution, can find others with the same problem but cant find any fix that works. I bet MrExcel would crush it. Wondering if someone has a macro that would open the three books, run refresh all, then shut the three books.

Any help would be much appreciated.

Thanks

Stephen

 

[Trevor G]

Try something like this:

Sub update1A()
Application.ScreenUpdating = False
Workbooks.Open "C:\Documents\workbookname.xlsm"
With ActiveWorkbook
.RefreshAll
.Save
.Close
End With
Workbooks.Open "C:\U\Documents\nextworkbookname.xlsm"
With ActiveWorkbook
.RefreshAll
.Save
.Close
End With
Workbooks.Open "C:\Documents\finalworkbookname.xlsm"
With ActiveWorkbook
.RefreshAll
.Save
.Close
End With
Application.ScreenUpdating = True
End Sub

<strike></strike>

 

[steallan]

Thanks very much, that looks great. We had a piece of code similar but missing some bits, yours looks the business.

I talk strange online.

Thanks TG

 

[Trevor G]

Thanks for the reply and I hope it works for you.