软件:EXCEL
版本:365
请问该如何设置一个按钮让我可以刷新外部资料后在保护工作表呢?
Public Sub tt()
ActiveSheet.Unprotect
ActiveWorkbook.RefreshAll
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
但是会发现第三行会太快执行 , 在更新完之前就会锁上活页簿, 导致更新失败
上MicroSoft 开发人员网站, 查到应用事件QueryTable_AfterRefresh
但经测试 , 我的物件并不属于QueryTable
求救版大，谢谢!