I've put this in my 'This Workbook' space. But it doesn't seem to be
working. Any ideas?

Private Sub Workbook_BeforeClose(Cancel As Boolean)

'Disables 'Do you want to save changes?' Alert Before Close

Application.DisplayAlerts = False

End Sub

Hi

What are you trying to do ?

If you want to close the workbook without saving the workbook and no
alerts, then use the below in your "Workbook_BeforeClose" event (You
don't have to turn off the alert):

Thisworkbook.Saved=True.

Hopes this heps.

---
Per


On 6 Maj, 20:52, wrote:
I've put this in my 'This Workbook' space. *But it doesn't seem to be
working. *Any ideas?

Private Sub Workbook_BeforeClose(Cancel As Boolean)

'Disables 'Do you want to save changes?' Alert Before Close

* * Application.DisplayAlerts = False

End Sub

On May 6, 8:00*pm, Per Jessen wrote:
Hi

What are you trying to do ?

If you want to close the workbook without saving the workbook and no
alerts, then use the below in your "Workbook_BeforeClose" event (You
don't have to turn off the alert):

Thisworkbook.Saved=True.

Hopes this heps.

---
Per

On 6 Maj, 20:52, wrote:



I've put this in my 'This Workbook' space. *But it doesn't seem to be
working. *Any ideas?

Private Sub Workbook_BeforeClose(Cancel As Boolean)

'Disables 'Do you want to save changes?' Alert Before Close

* * Application.DisplayAlerts = False

End Sub- Hide quoted text -

- Show quoted text -

Thanks. It worked. Any ideas why my first try didn't work?

If you want to save the workbook then put the following code:
ThisWorkbook.Save

If you don't want to save then put the following:
ThisWorkbook.Saved = True
--
A. Ch. Eirinberg


" wrote:

I've put this in my 'This Workbook' space. But it doesn't seem to be
working. Any ideas?

Private Sub Workbook_BeforeClose(Cancel As Boolean)

'Disables 'Do you want to save changes?' Alert Before Close

Application.DisplayAlerts = False

End Sub

Hi

Excel will always prompt the user to save an unsaved file before
closing it.

Another solution to close without saving:

ThisWorkbook.Close SaveChanges:=False

Regards,
Per


Thanks. *It worked. *Any ideas why my first try didn't work?-

On May 6, 8:37*pm, Per Jessen wrote:
Hi

Excel will always prompt the user to save an unsaved file before
closing it.

Another solution to close without saving:

ThisWorkbook.Close SaveChanges:=False

Regards,
Per





Thanks. *It worked. *Any ideas why my first try didn't work?-- Hide quoted text -

- Show quoted text -

Thanks, All.