Tag: 提示符

禁止“另存为”提示

我看了这个话题,发现了一些帮助,但build议似乎并没有工作。 我正在打开一个CSV文件到EXCEL中进行一些更改,然后想要将结果保存回相同的文件名和CSV格式。 我想这样做没有提示,我正在确保我想保存该文件。 我们正在使用一个macros启用Excel文件来导入数据进行更改,然后保存。 整个过程由一个batch file启动,这个batch file将会在一段时间内打开Excel应用程序和指定的文件,这就是为什么我们不希望提示停止进程。 这里是我在VBA中使用的代码来完成这项工作,以及我发现的其他潜艇,以帮助我压制提示。 此代码位于文件的TheWorkbook中,而不是模块。 我错过了什么吗? 码 Sub fixfile() Const strFileName = "W:\Webshare\Documents Acquired in 2017\Jim Excel\snr-room-schedule.csv" Dim wbkS As Workbook Dim wshS As Worksheet Dim wshT As Worksheet Set wshT = Worksheets.Add(After:=Worksheets(Worksheets.Count)) Set wbkS = Workbooks.Open(Filename:=strFileName) Set wshS = wbkS.Worksheets(1) wshS.UsedRange.Copy Destination:=wshT.Range("A1") wbkS.Close SaveChanges:=False 'This is the area of work […]