Saving Workbook with another name

[camalita]

Hi,

I have a form which I am using to update a workbook, I have a cmdbutton which adds the record and asks if the user wants to add another record. If the answer is No, the user is asked if the entry is the last entry for the week. If the answer is YES then the workbook is saved as wkbook1-date.xls. What I can't figure out is

How do I close the initial workbook and clear all the data from the worksheet if the entry is the last for the week.

Can anyone help me?

Thanks,

Mareene
This message was edited by camalita on 2002-04-30 08:59

 

[NateO]

So, you've got the message box with the yes-no buttons nailed down. To close the active workbook with no save try:

thisworkbook.close false

To clear the ranges, simply use code like the following:

sheet1.[a1].clearcontents

Just change the sheet # and range (cell a1 in this case) to suit your needs.

However, if you don't save the changes (clearing the contents) the workbook won't be saved. Code to save (assuming the path and name already exist) is:

thisworkbook.save

To save the same workbook with a different name, review the post at the following link. It will save the workbook to the location of your choice based on a cell value.

http://www.mrexcel.com/board/viewtopic.php?topic=6703&forum=2

Hope this helps.

_________________
Cheers,<font size=+2><font color="red"> Nate<font color="blue">O</font></font></font>
This message was edited by NateO on 2002-04-30 09:53