VBA中Sendkeys的用法

Sub test()
Shell "C:\ITACC\FISFrameworkSystem\FISFramworkLiveUpdate.exe"
firsttime = Timer
Do Until Timer - firsttime > 7
DoEvents
Loop
SendKeys "+{tab}" 
SendKeys "{tab}"
SendKeys "214"
SendKeys "{tab}"
SendKeys "214"
SendKeys "{enter}", True 
'ThisWorkbook.Close False
Application.Quit
End Sub
阅读更多
想对作者说点什么?

博主推荐

换一批

没有更多推荐了,返回首页