Select the option from Context menu

' right click and select Required option
intIdx=13 'points the which option to select in the right click menu
wpfWindow("Eclipsys Gateway My").SwfWindow("Prescription Writer").SwfTable("dgOMP").Click 20,20,micRightBtn
Set WshShell = CreateObject("WScript.Shell")
For intLoop = 1 To intIdx
WshShell.sendkeys "{DOWN}"
Next
WshShell.sendkeys "{ENTER}"
Set WshShell = nothing