EXL = CreateObject("Excel.Application")
Try
EXL = GetObject(, "Excel.Application")
Catch ex As Exception
If EXL Is Nothing Then
EXL = New Excel.Application
End If
End Try
System.Runtime.InteropServices.Marshal.ReleaseComObject(worksheets);
System.Runtime.InteropServices.Marshal.ReleaseComObject(worksheet);
System.Runtime.InteropServices.Marshal.ReleaseComObject(excelApp);
System.Runtime.InteropServices.Marshal.ReleaseComObject(range);
worksheets=null
worksheet=null
excelApp=null
range=null
把操作Excel文件用到的对象实例全部释放。然后资源回收!
GC.Collect()
本文介绍了使用VBA通过创建或获取Excel应用程序对象来操作Excel文件的方法,并详细展示了如何通过代码确保所有使用的COM对象被正确地释放,以避免内存泄漏等问题。
490

被折叠的 条评论
为什么被折叠?



