Code for Exiting not working

[fbiasi]

Hi there, simple problem, I think.

I have used the attached code as a macro for a command button on a work sheet and it works fine, no problems.
For a different workbook, I have a userform with a command button that I want the use to close the workbook.
I add the code to the 'command button click', but it doesn't work...gives me the error message...
"Compile error: Sub or function not defined' and the SaveQuit part of the first If statement is highlighted.

Please Login or Register  to view this content.

What's causing the error?

Thanks in advance,
Frank

[watersev]

hi Frank, as per your posted code the following code has the subroutines: SaveQuit, NoSaveQuit

Solution is either to place those subroutines in the workbook with user form or replace names of the subroutines with actual codes for them

[duncandhu]

Hi Frank,

It's trying to run another sub called SaveQuit or NoSaveQuit, or Cancel...
It can't find them - you need to copy them from the other workbook too, and put them in the same place.

Also - the last line, you have Abd instead of Ans (maybe a typo when you were copying/pasting here?)

Thanks,
Duncan

[xladept]

If those programs are, indeed, available at the time of execution then try:

Please Login or Register  to view this content.

*it may be risky to call a routine Cancel - so, if that's one of your routines, change its name

[fbiasi]

Thanks everyone for the responses......I see what I did wrong. I have copied the other bits of code, (for SaveQuit, NoSaveQuit and Cancel) and it seems to work.
Is there a 'cleaner' way to do this. Basically, I want a command button (Quit) to trigger a message box that gives the user the option to a) Save and Quit b) Don't save and Quit or c) Cancel message box without saving or quitting.

Thanks again
Frank

[duncandhu]

Hi,

Doesn't that happen anyway when you try to close a workbook (if you've made changes)...

But if you did want to do that anyway the code would be as follows (presuming all it's doing is saving the current workbook or not...)

Please Login or Register  to view this content.

If you want it to do something when you hit cancel, then that's different