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") ...