与VBA中的.bat文件交互

时间:2018-02-27 10:53:51

标签: vba shell batch-file sendkeys

我正在使用我的VBA代码中启动的.bat文件进行交互。 shell是开放的,我设法发送一些命令,但其他一些命令失败,如F9,DOWN和UP。

这是我的一大堆代码:

Sub OpenBrice()
Path = "F:\Brice\valpp"
ChDir Path
Shell Path & "\Brice.bat", vbNormalFocus

'Wait during opening BRICE
Wait (2) 

'PASS
SendKeys "123"
Wait (1) 
'Press Enter:
SendKeys "~"
Wait (1)

'Update current date
SendKeys "O"
Wait (1)
SendKeys "F"
Wait (1)
SendKeys (Format(Now(), "ddmmyy"))
Wait (1)
SendKeys "{ESC}"
Wait (2)
SendKeys "{F9}"

问题发生在最后一行,{F9}不起作用,{DOWN}或{UP}也是如此。 在代码中,行SendKeys "{F8}"完美地工作......

我怀疑shell的配置不好或类似的东西?非常感谢!

P.S:我只是在测试一些代码,我知道我应该声明我的所有变量并使用Option Explicit

0 个答案:

没有答案