Close without saving code

[Phil C]

I use the following code to save and close the current workbook.
Sub SaveandClose()
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub

How would I modify it so that I can close without saving and not have excel ask to save even if changes have been made to the document?

Thanks in advance

 

[Andrew Poulsom]

Just:

ActiveWorkbook.Close SaveChanges:=False