Gerando planilha excel

Discussão em 'EMS , HCM e Totvs 11' iniciado por Carlos Alberto Giusti, Setembro 6, 2023.

  1. Carlos Alberto Giusti

    Carlos Alberto Giusti Membro Ativo

    Tenho um programa que gera planilha excel. Quando gerado pelo RPW grava numa pasta e quando gerado pelo menu mostra em tela.
    Quando gerado pelo menu mostra em tela e abre normalmente.
    Quando gerado pelo rpw vou na pasta onde foi gravado e clico na planilha para abrir. Aí diz que é somente leitura e não mostra o que foi gravado na planilha. Faltou algum comando para fechar corretamente o Excel?
  2. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Supondo que a variável seja chExcel, basta fechar ele usando chExcel:QUIT(), mas recomendo testar antes

    também precisa rodar o RELEASE OBJECT chExcel.

    Pra mim eu fiz assim e funciona também:
    Código:
    excelAppl:ActiveWorkbook:SaveAs(CaminhoSalvamento,,,,,,1) NO-ERROR. /* Salva */
    chExcel:ActiveWindow:CLOSE(NO).
    
    Pra outros funciona assim:
    Código:
    chExcel:APPLICATION:DisplayAlerts = FALSE. //Desativa a pergunta se deseja salvar o arquivo
    chExcel:QUIT().
    
    Limpa as variáveis da memória:
    Código:
    RELEASE OBJECT chExcel.   /* Excel.Application  */
    RELEASE OBJECT chBook.   /* WorkBook */
    RELEASE OBJECT chSheet.  /* WorkSheet. */
    
    Depois de rodar isso, veja no Gerenciador de Tarefas do windows onde o programa rodou, não pode ficar o EXCEL.EXE na memória, tem que fechar
  3. Carlos Alberto Giusti

    Carlos Alberto Giusti Membro Ativo

    Fiz isso e não adiantou o arquivo gerado na pasta ao abrir diz que é somente leitura e não aparece os dados.

    com isso: dá erro ao executar
    excelAppl:ActiveWorkbook:SaveAs(CaminhoSalvamento,,,,,,1) NO-ERROR. /* Salva */
    chExcel:ActiveWindow:CLOSE(NO).

    e com isso: é como deixei e não adiantou
    chExcel:APPLICATION:DisplayAlerts = FALSE. //Desativa a pergunta se deseja salvar o arquivo
    chExcel:QUIT().

    qual saída que tenho. Preciso gerar a planilha na pasta e o aqauivo abrir normalmente e trazer todos os dados da planilha.
  4. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    O erro é em qual linha específicamente?

    Tem que corrigir pra fazer o QUIT e ele vai abrir normal
  5. Carlos Alberto Giusti

    Carlos Alberto Giusti Membro Ativo

    Como faço
  6. dudabrito

    dudabrito Membro Participativo

    Tente desta forma para salvar o arquivo excel:

    excelAppl:ActiveWorkbook:SaveAs(Arquivo,51,"","",FALSE,FALSE,3,1,1,1).

Compartilhe esta Página