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?