Deny User Save Option

P

Phil H

I have a workbook with all worksheets protected, located on a network. When
the user closes, Excel puts up a message, “Do you want to save…†giving the
user the option to save. I do not want the user to have this option. How do
I do this? Below is existing Auto_Close()

Sub Auto_Close()
Application.ScreenUpdating = False
Sheets("REP003").Select
Application.Goto Reference:=Range("A1"), Scroll:=True
Application.Goto Reference:=Range("A100"), Scroll:=False
ActiveWindow.Zoom = 85
Application.DisplayFullScreen = False
ActiveWindow.DisplayWorkbookTabs = True
ActiveWindow.DisplayHeadings = True
ActiveWindow.DisplayHorizontalScrollBar = True
Application.ScreenUpdating = True
End Sub
 
D

DDonnachie

This code should work for it

ThisWorkbook.Saved = True

I have it in a macro being run on the before close event
 
D

Duncan

perhaps if you set the property to saved (make it think it is saved)
with:

thisworkbook.saved = true

That might stop it, not entirely sure though how that one works, I
would personally put thisworkbook.close(false) which should not save
it.

Test it though,

Duncan
 
N

Norman Jones

Hi Phil,

Try:

'=============>>
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Me.Saved = True
End Sub
'<<=============

This is workbook event code and should be pasted into the workbook's
ThisWorkbook module *not* a standard module or a sheet module:

Right-click the Excel icon on the worksheet
(or the icon to the left of the File menu if your workbook is maximised)

Select 'View Code' from the menu and paste the code.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads


Top