I have written a macro that shows the Save As dialogue box, but I'd like to
add code that closes a workbook if the user selects "cancel".

Can anyone help?

When using the GetSaveAsFilename method, the method returns FALSE if the user
clicks Cancel. Thus, you only need to check the result of the method.

Dim response
response = Application.GetSaveAsFilename

if not response then
' User clicked false
Workbooks(NumberOrNameHere).close
else
' Do stuff
End if

HTH,
Matthew Pfluger

"JAO" wrote:

I have written a macro that shows the Save As dialogue box, but I'd like to
add code that closes a workbook if the user selects "cancel".

Can anyone help?