6 lines
209 B
Text
6 lines
209 B
Text
|
Dim WshShell
|
||
|
|
Set WshShell = WScript.CreateObject("WScript.Shell")
|
||
|
|
WshShell.SendKeys "{Down}{F2}"
|
||
|
|
WScript.Sleep 1000 ' one-second delay
|
||
|
|
WshShell.SendKeys "{Left}{Left}{BkSp}{BkSp}Some text here.~" ' ~ -> Enter
|