TRY oExcel := GetActiveObject( "com.sun.star.ServiceManager" ) CATCH TRY oExcel := CreateObject( "com.sun.star.ServiceManager" ) CATCH VALERT ( "OpenOffice no install", , , "X",,.t.,,{"aceptar"}) return 0 END END oDesktop = oExcel:CreateInstance( &qu...