Excel 的多进程使用,防止excel的误操作
程序通过ExcelApplication创建了一个隐藏的EXCEL进程并打开了一个内部excel文件进行操作,可是,在程序运行期间,如果用户再启动一个excel或者打开一个excel文件,则我隐藏的excel文件则被显示出来,数据彻底暴露,而且当excel被显示事件用户的操作可能导致Excel操作的异常,甚至用户可能关闭Excel导致操作无法继续
整个问题困扰了好长时间,终于找到解决方案:
解决方法:通过创建一个额外的Excel进程来保护真实使用的进程,使用户在打开Excel时使用该保护进程来进行操作,从而防止对正常进程的误操作
1.声明
'程序所要使用的进程
Private xlApp As Excel.Application
'保护进程(用户要使用的进程)
Private xlAppProtect As Excel.Application
2.初始化
Set xlApp = CreateObject("Excel.Application")
’先初始化程序要用的进程,因为用户在双击打开文档时间所调用的进程是最后创建的进程(即xlAppProtect )
Set xlAppProtect = CreateObject("Excel.Application")
3.运行
4.释放
xlApp.Quit
If xlAppProtect.Workbooks.Count = 0 Then
'保护进程可不能随便退出,用户可能正在使用
xlAppProtect.Quit
End If
Set xlApp = Nothing
Set xlAppProtect = Nothing