Hi Grouth
The problem might be in the array string
Change the string to
MyArrayString =
Array('C:\Documents and Settings\Administrator\My Documents\Cost Tracking\Rollups\[TestWB.xls]Sheet1'!R21C8:R24C10,'C:\Documents and Settings\Administrator\My Documents\Cost Tracking\Rollups\[TestWB.xls]Sheet2'!R21C8:R24C10) and [b]assign it to source[/b[
and separate the rest to another string
Function:=xlSum TopRow:=False, LeftColumn:=False, CreateLinks:=False
http://www.vbadud.blogspot.com