標題: [發問] 另存時直接覆蓋舊檔 [打印本頁]

---

作者: cowww    時間: 2023-4-5 17:15     標題: 另存時直接覆蓋舊檔

最近接手的報表比較多
而且儲存的位置又都不一樣
所以我在檔案裡面寫了一段自動儲存跟自動另存
可是另存總是會跑出是否要覆蓋舊檔
請問各位大大要如何修改讓Excel另存的時候自動覆蓋舊檔
不再跑出提示

  ActiveWorkbook.Save
   
    ChDir "K:\B.各組資料 (Team inform)\C.包裝組 (Packing group)\A.個人資料夾 (Personal folder)\Joe.Wu\支援生管\急件"
    ActiveWorkbook.SaveAs filename:= _
        "K:\B.各組資料 (Team inform)\C.包裝組 (Packing group)\A.個人資料夾 (Personal folder)\Joe.Wu\支援生管\急件\急件管理_v1_6.xlsm", FileFormat:= _
        xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False


[attach]36083[/attach][attach]36083[/attach][attach]36083[/attach]

---

作者: quickfixer    時間: 2023-4-5 21:46

回復 1# cowww


     Application.DisplayAlerts = False

'存檔

    Application.DisplayAlerts = True

---

作者: cowww    時間: 2023-4-6 08:01

回復 2# quickfixer

成功了
非常感謝quickfixer大大的指導

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)