Versão do Excel

Código em 4gl para identificar a versão do excel:

DEF VAR chExcelApplication AS COM-HANDLE NO-UNDO.
CREATE “Excel.Application” chExcelApplication.
IF chExcelApplication:version < "12.0" THEN MESSAGE "Office XP ou anterior." VIEW-AS ALERT-BOX INFO BUTTONS OK. ELSE MESSAGE "Office 2007 ou posterior." VIEW-AS ALERT-BOX INFO BUTTONS OK. RELEASE OBJECT chExcelApplication.

FDantas

Formado pela FPJ (Faculdade Politecnica de Jundiai), atualmente atuando como analista de sistemas. Trabalha há mais de 10 anos com analise, desenvolvimento e customização de sistemas desenvolvidos em Progress 4GL como Magnus, EMS e HCM. Atua também com desenvolvimento web, utilizando a ferramenta WebSpeed.

Você pode gostar...

Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

Unable to load the Are You a Human PlayThru™. Please contact the site owner to report the problem.