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


   

posted @ 2008-12-13 11:45  dzqabc  阅读(1800)  评论(0编辑  收藏  举报