Sent key stroke with Application.SendKeys : Application SendKeys « Application « VBA / Excel / Access / Word






Sent key stroke with Application.SendKeys

 

Public Sub SendKeyTest()
  Dim ReturnValue As Double
  ReturnValue = Shell("NOTEPAD.EXE", vbNormalFocus)
  Call AppActivate(ReturnValue)
  
  Application.SendKeys "Copy Data.xls c:\", True
  Application.SendKeys "~", True
  Application.SendKeys "%FABATCH~", True
End Sub

 








Related examples in the same category

1.Clears Immediate window