關於excel vba 常用警告提示關閉的問題

1、關閉文件時如果文件做了修改，系統會提示保存，用下列語句就不會提示了：

ThisWorkbook.Close savechanges:=False     

False表示不保存修改，如果改為True，則保存修改。類似的：

ActiveWindow.Close savechanges:=False

Windows(datfile).Close savechanges:=False

。。。

2、保存文件時如果存在同名文件，系統會提示是否覆蓋，用用下列語句就不會提示了：

在文件處理開始時，關閉報警：
Application.DisplayAlerts = False
在文件保存后，再打開報警：
Application.DisplayAlerts = True

 

3、下列語句可以消除“隱私警告”消息框：

ActiveWorkbook.RemovePersonalInformation = False

4、最后說一下，下列語句可以關閉屏幕閃動，但不影響用狀態欄顯示處理進度：

    Application.ScreenUpdating = False       '關閉屏幕顯示

    Application.ScreenUpdating = True        '打開屏幕顯示

   用狀態欄顯示進度的方法：

    For i = 1 To DataNo1

        。。。。。。
        '顯示進度
        Application.StatusBar = "已完成：" & CStr(Round(i * 100 / DataNo1, 2)) & "%"
        DoEvents
    Next i
5：關於VBA新建工作簿保存文件打開不兼容的問題 

ActiveWorkbook.SaveAs Filename:=Filename, FileFormat:=xlExcel8 :加格式參數