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