62,046
社区成员
发帖
与我相关
我的任务
分享
'这部分是我生成Excel结尾用的回收的代码,另外还调用了函数CloseExcel,用于在程序执行完成后强制关闭Excel进程,我使用的时候发现Excel可以出现多个进程,也就是说支持多线程的访问的,只要不是访问同一个文件,问题不是很大的。
ExcelMain.ActiveWorkbook.SaveAs(Path)
ExcelMain.ActiveWorkbook.Close()
ExcelMain.Quit()
ExcelMain = Nothing
GC.Collect(0) '强制回收系统资源
Sub CloseExcel()
Dim pro() As Process = System.Diagnostics.Process.GetProcessesByName("EXCEL")
For Each i As Process In pro
i.Kill()
Next
End Sub