excelFile= array("knjiga1.xlms","knjiga2.xlms","knjiga3.xlms")
dir="c:\excelFile\"

for f=1 to ubound(excelFile)
    fileName=Dir(dir & excelFile(f))
    ...
    kod koji otvori excel file i kopira sve listove u trenutni excel file
    ...
next f