Hi Borislav,

don't you know that you can change your message as long as nobody has replied to it? Open it, and select Update!

>Again I send just only Your question :o((( Sorry
>
>What happens If You change the code like this:
>

>old_error = ON("ERROR")
>fl_error = .f.
>ON ERROR fl_error = .f.
>oExcel = CreateObject("Excel.Application")
>ON ERROR &old_error
>IF fl_error .OR. TYPE("oExcel") # "O" .OR. ISNULL(oExcel)
>   MessageBox("I can't create an Excel Object", 0, "Warning")
>   RETURN .f.
>ENDIF
>oWorkbook = oExcel.workbooks.open(alltrim(basevars.baseljb) + "LaserJobbag.xls")
>...
>