See if this works for you.

Option Explicit

Sub Test()
Dim aWS As Excel.Worksheet
Dim myRange As Excel.Range
Dim myWB As Excel.Workbook
Dim r As Excel.Range

Set aWS = ActiveSheet
Set myRange = aWS.Range("A2:A10")

For Each r In myRange
Set myWB = Workbooks.Open(r.Text, UpdateLinks:=True)
myWB.Close savechanges:=True
Set myWB = Nothing
Next r

End Sub


--
HTH,

Barb Reinhardt



"Eric" wrote:

Does anyone have any suggestions on how to code it in macro?

There is a list of files under column A, I would like to create a macro to
open - updating all links - save - close each file one by one for each file
from A2 to A20. There is one condition to process each file, for example;

The following files will not be processed until the last updated for this
file C:\documents\A.xls is today, then open - updating all links - save -
close following files,

C:\documents\A1.xls in cell A2
C:\documents\A2.xls in cell A3
C:\documents\A3.xls in cell A4

The following files will not be processed until the last updated for this
file C:\documents\B.xls is today, then open - updating all links - save -
close following files,

C:\documents\B1.xls in cell A5
C:\documents\B2.xls in cell A6
C:\documents\B3.xls in cell A7

The following files will not be processed until the last updated for this
file C:\documents\C.xls is today, then open - updating all links - save -
close following files,

C:\documents\C1.xls in cell A8
C:\documents\C2.xls in cell A9
C:\documents\C3.xls in cell A10
...

Does anyone have any suggestions on how to code it in macro?
Thanks in advance for any suggestions
Eric