Hi,

I have a workbook named 10001.xls (the number is an ID) and I need to duplicate it to hundreds of workbooks with names as 10002, 10003 and so on...

Therefore I use "VALUE(LEFT(RIGHT(CELL("filename",A1),13),5))" in order to write the filename without the extension on a cell and work with this ID as needed.

However, I believe there is a problem with my current code (being duplicate as well), as I soon as I create other files (e.g: 10002.xls) those try to open 10001.xls) or 10001.xls itself try to open 10002.xls . I am not sure what I am doing wrong as I need the VBA code on each workbook to be independent.

Please have a look to all the code I have.

Sheet1:

Please Login or Register  to view this content.
ThisWorkbook:

Please Login or Register  to view this content.
Module1:

Please Login or Register  to view this content.
Module2:

Please Login or Register  to view this content.
Does anyone know where it is the mistake that keeps calling other workbooks?

Thanks,
Ionatan