Can not get rid of "Do you want to Save changes"

[hernandj]

Thanks in advance for helping.
This is my code. Very simple. I want the user to be able to close without the option or message to save". I want to simply close with no option, i.e. click on close and go away

[VBA] On Error GoTo 0
Cells.Select
Selection.Delete Shift:=xlUp
Workbooks.Open Filename:="\\xxx\Public2\Manufacturing\PMJobs.xls"
Range("Y3:Y3").Select
Selection.AutoFilter
End Sub
Sub auto_close()
ThisWorkbook.Saved = True
ActiveWorkbook.Saved = True
Application.DisplayAlerts = False
ActiveWorkbook.Close
Application.DisplayAlerts = True
' Workbooks("PMJobs.XLS").Close SaveChanges:=False[/VBA]

[Rob342]

Try
[VBA]
Sub auto_close()
ThisWorkbook.Save
ActiveWorkbook.Save
'Application.DisplayAlerts = False
ActiveWorkbook.Close False
'Application.DisplayAlerts = True
' Workbooks("PMJobs.XLS").Close SaveChanges:=False
[/VBA]