iT邦幫忙

0

VBA控制外部程式按按鍵

請問要怎用VBA去控制另一個外部程式自動按"ENTER"鍵?
在程式碼進行到asp.Engine.Run後,asp的這個程式跳出Error需要人工按ENTER,請問要怎用VBA去控制這個外部程式自動按"ENTER"鍵?

Sub Start()
path = Application.ThisWorkbook.path & "\DEMO\DEMO.bkp "
Set asp = GetObject(path)
asp.Visible = True

ExportDataCombustion (path)

'Run simulation unit operation
asp.Engine.Run

ERROR1 = asp.Tree.FindNode("\Data\Results Summary\Run-Status\Output\PER_ERROR").Value

https://ithelp.ithome.com.tw/upload/images/20200428/20126709GdhTzmYjY6.png

尚未有邦友回答

立即登入回答