 descripciu8c3b3n chequea queu800 haya pasado correctamente elu800 acceso au800 lau800 base deu800 datos yu800 queu800 nou800 estu8c3a9 enu800 modalidad deu800 desarrollo varg ocheckestadolicencia composiciu8c3b3n composiciu8c3b3n composiciu8c3b3n cu8c3b3digo function chequeovalorlicenciaok oevent asu800 object dimu800 omensaje asu800 string 'msgbox licenciamiento & cstr oestadolicenciamientook 'msgbox cambio au800 0u800 'oestadolicenciamientook 0u800 ifu800 oestadolicenciamientook 1u800 then 'msgbox licencia oku800 else omensaje omensaje omensaje chequeo deu800 licencia erronea. chru800 13u800 omensaje omensaje solicite seau800 instalado nuevamente poru800 cloudoffice ru800 chru800 13u800 omensaje omensaje mensajes au800 info cloudofficeu82ecomu800u82earu800 chru800 13u800 msgbox omensaje 16u800 error fatal ifu800 ocheckestadolicencia then oeventu82esourceu82eactiveconnectionu82eclose stardesktopu82eterminate else oestadolicenciamientook 1u800 endu800 ifu800 endif 'msgbox chequeovalorlicenciaok finu800 endu800 function bitu8c3a1cora bitu8c3a1cora bitu8c3a1cora usou800 macro main macro eventowhenloadingfromcabecera form presupuesto 