如何删除[保存?,覆盖?,保留CSV格式?提示]在保存.CSV文件的同时?

时间:2017-12-04 12:04:28

标签: vba

一般来说,我遇到的问题是每当我的代码结束时(见下文):

  • 询问是否将更改保存到.csv 当我点击"是"时,它会打开包含文件位置的窗口,我必须选择"保存"
  • 询问是否覆盖文件
  • 询问是否保持CSV格式

您能否建议我如何删除上述提示[同时保存/覆盖旧版本的文件]?

Sub Test()
Application.ScreenUpdating = False
Application.DisplayAlerts = False

****rest of the code***

   WB1.Save
   WB2.Save
   WB3.Save
   Application.Quit

Application.DisplayAlerts = True
Application.ScreenUpdating = True
    End Sub

1 个答案:

答案 0 :(得分:0)

感谢@Peter_Pesch的建议,决议如下[PS。我在VBA运行时打开了4个文件]:

   ....

   WB1.Save
   WB1.Saved = True
   WB2.Saved = True
   WB3.Saved = True
   ActiveWorkbook.Saved = True
   Application.Quit

Application.DisplayAlerts = True
Application.ScreenUpdating = True
    End Sub