1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

O Excel não fecha

Discussão em 'Progress 4GL' iniciado por denismaster, Janeiro 26, 2016.

  1. denismaster

    denismaster Membro Participativo

    E aew pessoal.

    Bom eu tenho uma rotina de exportar tabela de preço para o excel.
    Quase tudo ocorre perfeitamente... exceto que no final o Excel não fecha.

    Eu uso o código abaixo para fechar.

    Código:
    chExcelApplication:ActiveWorkbook:Close NO-ERROR.       
        IF valid-handle(chExcelApplication) THEN DO:
            release object chExcelApplication       no-error.
        END.   
        IF valid-handle(chWorkbook) THEN DO:
            release object chWorkbook               no-error.
        END.
    Alguém me dá uma ajuda... eu exporto 20 tabelas x 25 UFs... então tenho 500 'Excéis' abertos...
  2. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    coloca
    chExcelApplication:ActiveWorkbook:QUIT

    ou

    chExcelApplication:QUIT

    Remove também o NO-ERROR para você conseguir ver o erro após o close.

    O Close somente fecha o arquivo, não fecha o programa.
  3. denismaster

    denismaster Membro Participativo

    Rafael é isso mesmo!
    Muito Obrigado.
  4. denismaster

    denismaster Membro Participativo

  5. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    maravilha, vlw pelo feedback

Compartilhe esta Página