Public Sub Reopen()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Workbooks.Open "K:\notarealpath\Testamundo.xlsm"
End Sub
我需要通过关闭并重新打开它来刷新工作簿,这似乎有效,因为我将它分配给一个按钮,当点击它时会询问我是否确定要重新打开这本书很好。
有时它会起作用,然后第二次完全崩溃Excel,当回到VBA屏幕时,它会在崩溃后抱怨内存不足。
答案 0 :(得分:0)
您是否尝试过关闭,延迟,然后在同一个宏中打开?确保将其保存在工作簿之外(可能是一个快速按钮,引用保存在XLSTART中的宏)。
Workbooks("Testamundo.xlsm").Close SaveChanges:=False
Application.Wait Now + TimeValue("00:00:05")
Workbooks.Open "K:\notarealpath\Testamundo.xlsm"