2011-07-27 55 views
2

Before setting Application.DisplayAlerts = False It gets set to false Yet it still gives me the save as!兩個抑制更改保存在Excel對話框的方法是不工作

對於那些誰不喜歡的圖片:

Close logFile 
    Application.DisplayAlerts = False 
    If WasOpened2 Then Workbooks(FilenameNoPath(FoundFiles(i))).Close False 
    Application.DisplayAlerts = True 

Application.DisplayAlerts =假應該禁止任何與來自excel的所有警報。此外,我被認爲將False傳遞給.Close應該不會自動保存工作簿中的更改。但我仍然得到一個提示。有任何想法嗎?

+0

此外,隨意大聲笑在那裏的啞評論,他們不是我的。 – James

+1

是FilenameNoPath數組還是函數?我會假設一個函數。 –

+0

@PaulR這是一個函數,它不關閉文件。它只返回沒有路徑的文件名。 – James

回答

3

我曾經暗示另一個Excel插件可能會導致問題。 同事建議用代碼包裝以抑制事件。這工作:

Application.EnableEvents = False 
    Application.DisplayAlerts = False 
    If WasOpened2 Then Workbooks(FilenameNoPath(FoundFiles(i))).Close False 
    Application.DisplayAlerts = True 
    Application.EnableEvents = True