oDoc = ThisForm.oleBrowserWin.object.Document oDoc.Focus() && document must have focus WshShell = CreateObject("WScript.Shell") WshShell.SendKeys("+{F10}")to:
ThisForm.oleBrowserWin.SetFocus () WshShell = CreateObject("WScript.Shell") WshShell.SendKeys("+{F10}")and it worked, as I wanted to.