bError = .F. On error bError = .T. loExcel = createobj("excel.application") If bError MessageBox("Error") ... Return Endif MessageBox("Version: " + loExcel.Version) On Error