在macrosclosures工作簿后,Excel冻结
我想在完成macros执行后closures工作簿。 所以我使用这个代码
Workbooks("RPA 1.xlsm").Close
但是,RPA 1.xlsmclosures后,另一个活动工作簿冻结,无法closures。 似乎有东西被困住了。
任何人知道为什么
这是你的问题的答案。
使用VBAclosuresExcel应用程序
也许工作簿仍然没有保存,这就是为什么它冻结。 如我错了请纠正我。 谢谢。
以这个例子:
Const xlAscending = 1 Const xlYes = 1 Dim filePath filePath = "C:\Users\book1.xlsx" Set objExcel = CreateObject("Excel.Application") objExcel.Visible = False objExcel.DisplayAlerts = False Dim objWorkbook Set objWorkbook = _ objExcel.Workbooks.Open(filePath) Set objWorksheet = objWorkbook.Worksheets(1) Set objRange = objWorksheet.UsedRange Set objRange2 = objExcel.Range("A1") objRange.Sort objRange2, xlAscending, , , , , , xlYes 'objExcel.Application.DefaultSaveFormat = xlWorkbookNormal' objWorkbook.Save objExcel.Application.Quit Set objExcel = Nothing
请参阅以下内容:
objWorkbook.Save objExcel.Application.Quit Set objExcel = Nothing objExcel.Visible = False objExcel.DisplayAlerts = False
Visible = false意味着excel不会打开
DisplayAlerts = false允许您忽略当您尝试更改Excel时popup的msgBox。
前两个命令是closuresexcel文件。
希望一切都清楚,让我知道如果你有更多的问题