Create a Save Button

I'm creating a form that users will fill out through out the day and then save each night to a certain folder with a certain name. to prevent mistakes, I wanted to automate this process as much as possible.

I have created a save button on my form, I need it to do 3 things:

1 - Save the workbook using the information in cell D2 as the first half of the file name. The other half should be a time / date stamp.
An example of what I'd like the file name to look like would be:
Kevin.73020120917.xlsm
(D2) (date) (time)

2 - That file needs to be saved to a specific folder: o:\bellingham\intranet\reporting\forkliftweights\

3 - Close workbook.


If there is any other function you would recommend including on this, I'd love any feedback as well. Would it be worth including something that checks for duplicate file names? etc.

Thanks!

Hello there,

Try this.

Please Login or Register  to view this content.

You'll need to insert a command button onto your worksheet and then add the above code to it.

Thanks for your response, I wonder if I did something wrong. I went into design mode, Right Clicked on my button and clicked "View Code"

at that point I copied the following:

Please Login or Register  to view this content.

I saved my module and closed it and went back to test the save button and got this error:

Compile error:

Invalid outside procedure

My module was automatically opened and had highlighted:

="o:\bellingham\intranet\reporting\forkliftweights\"

Sorry I forgot to add the extension at the end try this:

Please Login or Register  to view this content.

hmmm.... its still doing the same thing... Do I need an end sub or anything added onto it?

Aaah, I got it, thanks!

I was missing the sub end sub part. My code now looks like this:

Please Login or Register  to view this content.

And it works great!

Thanks for your help!

No problem!