Create new workbook based on sheet

[igormigor]

Hi all,

I've created macro that from the main document (Order generator) will create new workbook (Order Document). The steps for this are the following:

1. Unhide the "Order Document-template" sheet from the "Order generator" file.
2. Copy the "Order Document-template" sheet in new workbook.
3. Change name of new "Order Document-template" sheet in the new workbook to "Order Document".
3. Change the name of the new workbook to "Order Document".
4. Hardcode (copy/past) the data (the whole sheet) in the new workbook
5. Display message: "Order Document will be saved on your computer."
6. Delete the rows in the "Order Document" sheet if the value in column G is 0.
7. User defined where the new workbook to be saved.
8. Delete column G in the "Order Document".


I need to make changes to the macro, so it will hide the "Order Document-template" sheet in the "Order generator" workbook, at the end of the macro.
Also, I need the macro to have the flexibility and work even if the name of the "Order generator" workbook is changed.

Thank you in advance.

Igor

Order generator.xlsb

[Norie]

You don't need step 1, you can copy a worksheet without unhiding it.

As for the second part I don't see where you refer to the 'Order generator' workbook in the code, but if you do need to you can use ThisWorkbook instead of using Workbooks(workbookname).

[igormigor]

Hi Norie,

I've change in the last part of the code to ThisWorkbook instead of ActiveWorkbook and it worked.

'hide template sheet
ThisWorkbook.Sheets("Order Document-template").Visible = xlSheetVeryHidden



Thank you a lot.

Igor