VBA工作簿.如果用户想要保存,则不提示关闭？

Question

我正在编写一个将.xls文件转换为.csv文件的VBA程序.问题是提出了"Do you want to save the changes to myFile.csv?"对话框.

这是我的代码片段:

currentBook.SaveAs Filename:=fileNameS, FileFormat:=xlCSV, ConflictResolution:=xlLocalSessionChanges    
currentBook.Close SaveChanges:=False

我需要添加什么才能得到"你想保存更改myFile.csv吗？" 对话框？

Answer 1

尝试使用 ThisWorkbook.Saved = True

        Application.DisplayAlerts = False
        currentBook.SaveAs Filename:=fileNameS, FileFormat:=xlCSV, ConflictResolution:=xlLocalSessionChanges
        currentBook.Saved = True            
        currentBook.Close SaveChanges:=False
        Application.DisplayAlerts = True