save file notification
 

How to skip the: "Do you you want to save changes you nade to....."
notification??
(files which are read only for all usesr)
thanks

save file notification
 

Hi Dan:

Include this macro in the workbook coding area:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Saved = True
End Sub

--
Gary''s Student - gsnu200738


"Dan" wrote:

How to skip the: "Do you you want to save changes you nade to....."
notification??
(files which are read only for all usesr)
thanks

save file notification
 

Well, this is dangerous because there will be no opportunity to save the
file under another name if it's read-only. But, assuming that's what you
want to do, remove the read-only property, open the file, right-click on the
Excel icon at the left of the toolbar and select View Code. Copy this code
and paste it in there. Save the file, close it and set it to read-only.
HTH, James

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If ThisWorkbook.ReadOnly Then ThisWorkbook.Saved = True
End Sub

"Dan" wrote in message
...
How to skip the: "Do you you want to save changes you nade to....."
notification??
(files which are read only for all usesr)
thanks

save file notification
 

Thanks. it works!!!


"Gary''s Student" wrote:

Hi Dan:

Include this macro in the workbook coding area:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Saved = True
End Sub

--
Gary''s Student - gsnu200738


"Dan" wrote:

How to skip the: "Do you you want to save changes you nade to....."
notification??
(files which are read only for all usesr)
thanks

save file notification
 

Thanks, it works!!

"Zone" wrote:

Well, this is dangerous because there will be no opportunity to save the
file under another name if it's read-only. But, assuming that's what you
want to do, remove the read-only property, open the file, right-click on the
Excel icon at the left of the toolbar and select View Code. Copy this code
and paste it in there. Save the file, close it and set it to read-only.
HTH, James

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If ThisWorkbook.ReadOnly Then ThisWorkbook.Saved = True
End Sub

"Dan" wrote in message
...
How to skip the: "Do you you want to save changes you nade to....."
notification??
(files which are read only for all usesr)
thanks