作者o1o3o1o31030 (主席)
看板Office
标题[算表] VBA重新整理後事件触发
时间Mon Jul 6 14:30:08 2020
软体:EXCEL
版本:365
请问该如何设置一个按钮让我可以刷新外部资料後在保护工作表呢?
Public Sub tt()
ActiveSheet.Unprotect
ActiveWorkbook.RefreshAll
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
但是会发现第三行会太快执行 , 在更新完之前就会锁上活页簿, 导致更新失败
上MicroSoft 开发人员网站, 查到应用事件QueryTable_AfterRefresh
但经测试 , 我的物件并不属於QueryTable
求救版大,谢谢!
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 61.220.255.181 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1594017010.A.F32.html
1F:→ o1o3o1o31030: 我的表格是 power query载入的查询 07/06 14:31
2F:→ soyoso: google wait until activeworkbook.refreshAll finishes 07/06 14:44