[算表] 巨集無法自動更新

看板Office作者 (樹枝擺擺)時間5年前 (2018/07/23 11:14), 5年前編輯推噓0(006)
留言6則, 1人參與, 5年前最新討論串1/1
軟體:Excel 版本:2016 請問,我在excel裡寫了一個簡單VBA,想要測試自動更新 內容如下: Sub auto_update() Sheets(1).Activate Range("A1").Activate ActiveCell.FormulaR1C1 = Now() Application.OnTime Now + TimeValue("00:00:03"), "auto_update" End Sub 但一執行到Application.OnTime時,就會出現 「該巨集可能無法在此活頁簿中使用,或者已停用所有巨集」 我已經將信任中心的巨集設定安全性設到最低,還是會出現同樣錯誤 我也試過把Application.OnTime拉到外面來執行,變成兩個獨立巨集, Sub auto_update() Sheets(1).Activate Range("A1").Activate ActiveCell.FormulaR1C1 = Now() End Sub sub test() Application.OnTime Now + TimeValue("00:00:03"), "auto_update" end sub 因為執行巨集前半都沒問題,都只出在Application.OnTime 請問這個Application.Ontime有什麼另外要注意的地方嗎? 謝謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 61.220.69.237 ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1532315692.A.612.html

07/23 11:52, 5年前 , 1F
是否將巨集寫在工作表內,測試寫在該處時會產生如原文的錯
07/23 11:52, 1F

07/23 11:53, 5年前 , 2F
07/23 11:53, 2F

07/23 11:54, 5年前 , 3F
如果是的話,請新增個模組,將巨集寫於該模組內,再執行看
07/23 11:54, 3F

07/23 11:54, 5年前 , 4F
07/23 11:54, 4F

07/23 12:29, 5年前 , 5F
如寫於工作表內,而不改寫到模組內的話,"auto_update"前
07/23 12:29, 5F

07/23 12:30, 5年前 , 6F
則以完整檔名!worksheet.codename(如工作表1).auto_update
07/23 12:30, 6F
已解決,真的是沒把VBA寫在模組裡的關係, 以前都沒注意到,謝謝! ※ 編輯: liquidbox (61.220.69.237), 07/23/2018 12:33:56
文章代碼(AID): #1RLKWiOI (Office)