Custom Save As
 

I've written some code to allow a spreadsheet user to click a button which
activates the "Save As" dialogue and also inserts a suggested filename for
the "Save As" action. This all works fine.

However, I need help with three items:

1) How can I force the default save as directory to be the current working
directory?

2) How can I add code to do something if the user clicks "Cancel" from the
"Save As" dialogue?

3) Is there a way to eliminate all code from one specific "Sub" routine if
the user completes the "Save As" action?

Thanks in advance!