Save Changes:= False property not working

[ks1987]

Hi All,

I have written a code which uses the Save Changes: = False property of the Activeworkbook.close method. However, on running the code the user is being prompted to save the file.

The code snippet looks like this:

Dim w as workbook
Set w = workbooks.add
w.Close SaveChanges:=False

I have left out code which did not have relevance to the exercise (related to copying to and from workbooks)

Thanks,
ks1987

 

[dsouzahit]

Try

Activeworkbook.Close False </pre>

Hi All,

I have written a code which uses the Save Changes: = False property of the Activeworkbook.close method. However, on running the code the user is being prompted to save the file.

The code snippet looks like this:

Dim w as workbook
Set w = workbooks.add
w.Close SaveChanges:=False

I have left out code which did not have relevance to the exercise (related to copying to and from workbooks)

Thanks,
ks1987

 

[ks1987]

This is not working as well.

 

[VoG]

You could try this (it does not actually save the workbook)

        Dim w As Workbook
        Set w = Workbooks.Add
        w.Saved = True
        w.Close SaveChanges:=False

 

[ks1987]

Wow! you're a wizard VoG.

Would you know, why in god's name wouldn't the first procedure work and this one works instead?

 

[jcwillia1]

This also worked for me.

I was opening workbooks that had event code in them, protected workbook and a hidden sheet that I was trying to get data off of.

So I opened the workbook, turned off application events, unprotected the workbook, un-hid the sheet, read the data into some variables, write that data to a different sheet,

THEN

Close without Save.

It kept popping up a "Save As" window.

Tried DisplayAlerts False - that didn't work.

So I set ActiveWorkbook.Saved = True as indicated above and for some reason it worked.

I'm still not sure I understand why but it did.


Thanks - hope this helps someone else.