Start of Week Replication

[Wizerd]

I have a book that has 6 template sheets (Sheet1-Sheet6). I am looking to have a message box input the 'Start Date', then 'How Many Days'. With this info I need to replicate the templates with the dates (ie: 03-28-Sheet1, 03-28-Sheet2...ect...ect), from the starting date, looping for second input number. Any help would be greatly appreciated.

 

[Micron]

So if a person input 3 for the days count you'd want to end up with 18 new sheets in the same new workbook?
I think a userform with 2 controls (one for each data value) would be better than 2 input prompts. Message boxes don't accept inputs.

 

[Wizerd]

So if a person input 3 for the days count you'd want to end up with 18 new sheets in the same new workbook?
I think a userform with 2 controls (one for each data value) would be better than 2 input prompts. Message boxes don't accept inputs.

That is correct: for 3 days, it would make 18 sheets, each with the date as the prefix.

 

[Micron]

I have no code for this but have been researching. It seems you can't copy from wb to wb and rename at the same time (if you can, I've not found code for that). So the process might have to be
- copy all 6 sheets to a new wb as Sheet1, Sheet2, etc.
- activate the new wb and rename all as 03-28- & Sheet.Name
- repeat copying in a counting loop (i) but as 03-28- & Left(Sheet.Name,5) & i

You should be able to find plenty of example codes for copying sheets to a new wb as as start.