how to close Read Only file without prompt to save copy

's Computer Specifications

Hi
I'm working on an Excel file that will always be opened as Read Only by users.
To save confusion I would rather the user is not prompted to save the file
on exit.
I've tried application.displayAlerts = False in the Workbook BeroreClose
event code
but no joy so far.
Is it posible to achieve this?
Thanks

's Computer Specifications

Try

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Me.Close False
End Sub

--
Jacob (MVP - Excel)

"David" wrote:

> Hi
> I'm working on an Excel file that will always be opened as Read Only by users.
> To save confusion I would rather the user is not prompted to save the file
> on exit.
> I've tried application.displayAlerts = False in the Workbook BeroreClose
> event code
> but no joy so far.
> Is it posible to achieve this?
> Thanks

's Computer Specifications

Thanks Jacob (I made sure to click on yes)

Worked fine

Is there any way to close the application "shell" along with the file
as is usual with only a single file open?

"Jacob Skaria" wrote:

> Try
>
> Private Sub Workbook_BeforeClose(Cancel As Boolean)
> Me.Close False
> End Sub
>
>
> --
> Jacob (MVP - Excel)
>
>
> "David" wrote:
>
> > Hi
> > I'm working on an Excel file that will always be opened as Read Only by users.
> > To save confusion I would rather the user is not prompted to save the file
> > on exit.
> > I've tried application.displayAlerts = False in the Workbook BeroreClose
> > event code
> > but no joy so far.
> > Is it posible to achieve this?
> > Thanks

's Computer Specifications

Ofcourse YES; Try the below. Be careful this will quit the app; even if you
have other workbooks open..

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
Application.Quit
End Sub

--
Jacob (MVP - Excel)

"David" wrote:

> Thanks Jacob (I made sure to click on yes)
>
> Worked fine
>
> Is there any way to close the application "shell" along with the file
> as is usual with only a single file open?
>
> "Jacob Skaria" wrote:
>
> > Try
> >
> > Private Sub Workbook_BeforeClose(Cancel As Boolean)
> > Me.Close False
> > End Sub
> >
> >
> > --
> > Jacob (MVP - Excel)
> >
> >
> > "David" wrote:
> >
> > > Hi
> > > I'm working on an Excel file that will always be opened as Read Only by users.
> > > To save confusion I would rather the user is not prompted to save the file
> > > on exit.
> > > I've tried application.displayAlerts = False in the Workbook BeroreClose
> > > event code
> > > but no joy so far.
> > > Is it posible to achieve this?
> > > Thanks

Thread Tools
Show Printable Version Email this Page
Rate This Thread
Rate This Thread:

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Macro to save and close, then copy file	NewSysAdmin	Microsoft Excel Misc	2	2nd Dec 2009 03:24 PM
read log text file and prompt to user to open or save	Raymond Chiu	Microsoft C# .NET	0	10th Feb 2009 02:14 AM
Save copy of file to open as read only	Ray Clark	Microsoft Excel Misc	2	20th Jun 2008 12:19 AM
Intercepting the file save prompt before close?	=?Utf-8?B?TmVpbCBCaGFuZGFy?=	Microsoft Excel Programming	3	14th Feb 2006 03:19 AM
CLOSE ALL macro for XL2K (but with prompt to save for each file)?	StargateFan	Microsoft Excel Programming	2	10th Aug 2005 02:32 PM