2013-10-29 15 views
0

當我按下按鈕時,我有一個代碼可以在新文件夾中自動保存;代碼工作正常,但兼容性檢查器在允許保存之前出現。有沒有辦法禁用這個兼容性檢查器,以便使用自動保存按鈕的人不會感到困惑?有沒有辦法在Excel 2010中禁用兼容性檢查器?

這裏是我的代碼:

Sub FILESAVE() 

     ActiveWorkbook.SaveAs Filename:="H:\Digital Production Control and Tally Sheet Library\ " & Range("'Production Control Sheet'!B2") & _ 
     Format(Now(), " mm-dd-yyyy hh-mm AMPM"), FileFormat:=xlNormal, Password:="", _ 
     WriteResPassword:="kpqual", ReadOnlyRecommended:=True, CreateBackup:=False 


End Sub 

它可以創造奇蹟,但我只是不知道如何禁用兼容性檢查工具的問題。

回答

1

試試這個,告訴我,如果它的工作原理:

Sub FILESAVE() 
     ' http://msdn.microsoft.com/en-us/library/gg132972(v=office.14).aspx 
     '51 = xlOpenXMLWorkbook (without macro's in 2007-2013, xlsx) 
     '52 = xlOpenXMLWorkbookMacroEnabled (with or without macro's in 2007-2013, xlsm) 
     '50 = xlExcel12 (Excel Binary Workbook in 2007-2013 with or without macro's, xlsb) 
     '56 = xlExcel8 (97-2003 format in Excel 2007-2013, xls) 
     ' See more info on http://www.rondebruin.nl/win/s5/win001.htm 
     ActiveWorkbook.SaveAs Filename:="H:\Digital Production Control and Tally Sheet Library\ " & Range("'Production Control Sheet'!B2") & _ 
     Format(Now(), " mm-dd-yyyy hh-mm AMPM"), FileFormat:=52, Password:="", _ 
     WriteResPassword:="kpqual", ReadOnlyRecommended:=True, CreateBackup:=False  
End Sub 
+0

工作就像一個魅力。謝謝@Tony! – Dwevon

相關問題