Please see the attached workbook, (the code is also repeated below for 'browsing' purposes).
I have implemented the 'InputBox' for names that are repeated, or too long, as I feel this is most flexible.
You may also notice that when I copy the timetable sheets I do not copy the 'Sheet', but rather insert a new blank sheet, and then copy the cells from one sheet to the other. This avoids the issue with repeatedly copying a worksheet within a workbook, (http://support.microsoft.com/kb/210684).
It then reapplies the 'Print_Area' that is defined on the TimeTable templates. I don't know if you are using the 'Print_Area' at all, but as it was defined on the original templates I have copied it to the timesheets. If you don't need it then just comment out the green text.
You will note that there are a few areas of code that are commented out. This is because during testing I was outputing the Timetables to a different workbook so that I could delete and restart them easily. I have left the code areas in below in case you find them useful.
To re-enable the outputing to a different workbook you need to comment the blue text, and uncomment the red text 
Please let me know how you get on.
Bookmarks