Dim objShell
Set objShell = CreateObject("WScript.Shell")
objShell.Run "C:\Windows\System32\Notepad.exe",,False
WScript.Sleep 1000
objShell.AppActivate "Untitled - Notepad"
objShell.SendKeys "Hello World!"
'Just do a search for sendkeys and you will find all the symbols for various special key combinations such as alt+f4.