Hi all,

Generally If this were a straight copy of a sheet I would know how to code it, but there are a few conditions that I want to add that Im not sure how to approach.

I have a spreadsheet that is a cash register and records the day's sales history.
On closing the only sheet visible is "Pack Down Procedure", where the use goes through a bunch of steps and then eventually clicks the "CLOSE SHOP" button, which clears all the data for the day and restores the "Cash Register" sheet for when the user next opens the xls.

Before completing these two task I would also like that button to do few things:

First of all copy the sheet "Today" which at this point is set to visible = xlVeryHidden

Then move that copied sheet to another workbook;

If there is an existing workbook for the current month I would like the sheet moved to that workbook and renamed as the current date (the date is displayed on the "Today" sheet in cell "B3"). ie for August it would be called; Lenny's Takings - 2010-08.xls and the tab for today called 23/08/10

The location of this workbook would be C:\Users\Adam\Documents\Cafe Docs\Lenny's\Accounting\Lenny's Takings - 2010-08.xls

However, when the shop is open for the first time for a month, ie 1st, 2nd or 3rd of that month, there will not be an existing workbook for that month for the sheet to paste into.

Therefore if there is no existing workbook for the month I would like it to Open, rename and Save from the template xls called; Lenny's Takings - Template.xls

Its location is C:\Users\Adam\Documents\Cafe Docs\Lenny's\Accounting\Lenny's Takings - Template.xls

ie if there was no workbook for this month the macro would open, rename and save the template as the filename above Lenny's Takings - 2010-08.xls and then move the copied "Today" sheet into that document and rename the tab from "Today" to the current date.

If this ispossible, any help would be greatly appreciated.

Thanks