主题：打开 EXCEL如何等待EXCEL窗口关闭后

Dim Proc As New Process '定义一个新的Process
Proc.File = "d:\test.xls" '指定要打开的文件
Proc.Start()

Do While FileIsOpened("d:\test.xls")
    Application.DoEvents
Loop

msgbox(2)