You could use something like (placed after each workbook has been
opened)
Sheets("Sheet1").Copy Befo=Thisworkbook.Sheets(1)
Martin
http://homepage.ntlworld.com/martin.rice1/
--
mrice
------------------------------------------------------------------------
mrice's Profile:
http://www.excelforum.com/member.php...o&userid=10931
View this thread:
http://www.excelforum.com/showthread...hreadid=531956