DIM Wsh Set Wsh = WScript.CreateObject("WScript.Shell") WScript.Sleep 200 Wsh.SendKeys "{tab}{right}{home}{down}{enter}{tab}" Set Wsh = nothing WScript.Quit