標題: [發問] 請問呼叫外部程式並等待完成時通知怎麼寫比較好 [打印本頁]

---

作者: stillfish00    時間: 2013-4-18 17:36     標題: 請問呼叫外部程式並等待完成時通知怎麼寫比較好

請問如果我想在VBA中執行一個外部程序(假設為一個vbs檔) ,
因為用Shell("wscript C:\a.vbs") 不會等待完成 , 我改用以下寫法

但是因為外部程序執行時間很久(幾十分鐘到幾小時) ,
執行時就無法使用Excel了 , 請問要怎麼改才能兼顧
1.  外部程序執行完才提示使用者
2.  外部程序執行時仍可以正常使用Excel(開關其他的Excel檔)


Sub myStep3()
    Dim wsh As Object
    Dim result As Integer

    Set wsh = VBA.CreateObject("WScript.Shell")   
    result = wsh.Run("C:\a.vbs", 1, True)

    If MsgBox("Complete!" & vbLf & "Do you want to continue?", vbYesNo) = vbYes Then
        Call ReadResult()
    End If
End sub

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)