Close file without saving

[Guest]

My current program looks like the following:

Private Sub Auto_Close()
ThisworkBook.Save
ThisworkBook.Close
End Sub

The above saves the file and closes it automatically when the user exits the
file and no prompts are generated.

Could someone please show me what the code would look like to insead close
the file WITHOUT saving and WITHOUT generating a "Do you want to save?"
prompt?

 

[Jarek]

Hi,

Private Sub Auto_Close()
ThisWorkbook.Saved = True 'does not save the workbook, only marks i
as saved
ThisWorkbook.Close False
End Sub

or

Private Sub Auto_Close()
Application.DisplayAlerts = False 'to eliminate prompt "Do you wan
to save?"
ThisWorkbook.Close SaveChanges:=False
End Sub


Jare

 

[Guest]

Sorry, I just figured it out:

ThisWorkBook.Close SaveChanges:=False

Thanks.

 

[Guest]

Hi,
I'm having problems with this one. I am entering your second code in "this
workbook" after other code. The application display alerts is still showing
the "do you want to save" screen and I'm getting an error message when I put
in - this workbook. close savechanges: = false
Any ideaqs ?
Mike

 

[Chris]

hi.i'm only starting to learn this, but try calling the next macro before the
end of your first macro...

like before "end sub", type "call (your macro name)"

learned it from joel... thanks joel