Hi MJ MJ,
1. Whenever an error occurs, an error message from Windows Script Host is reported. Take a close look at the faulty line.
2. It could be that the script has to wait a little until the message appears.
. . .
session.findById("wnd[0]/tbar[0]/btn[11]").press
wscript.sleep 1000
On Error Resume Next
xclsht.Cells(i, 4).Value = session.findById("wnd[0]/sbar").Text
On Error GoTo 0
Next
. . .
Regards,
ScriptMan