run a loop that will add numbers to end of file
example
Code:
for counter = 1 to 10
   fileName = fileName & Format(Counter, "00")
next counter
you sould get
Excell01
Excell02
Excell03
Excell04
Excell05
Excell06
Excell07
Excell08
Excell09
Excell10

hope that helps