1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.
  2. Anuncie Aqui
    Anuncie aqui você Também: fdantas@4each.com.br

Exportação para excel em mais de uma aba

Discussão em 'Progress 4GL' iniciado por Japs, Abril 10, 2014.

  1. Japs

    Japs Sem Pontuação

    Boa tarde pessoal!
    Aproveitando o gancho do outro tópico do @rafael.andrade com dicas também do @jaozi_nho e do @clandestinos , como eu faço pra fazer uma exportação pra duas abas no excel?
    É simples? Poderiam me passar um exemplo?

    Desde já agradeço a todos pela ajuda.
  2. jaozi_nho

    jaozi_nho Membro Participativo

    É bem facil, segue um exemplo de como mudar de aba na mesma planilha excel .

    Código:
    DEF VAR chExcel             AS COM-HANDLE NO-UNDO .
    DEF VAR chSheet             AS COM-HANDLE NO-UNDO .
    
    CREATE "Excel.Application" chExcel.
    chExcel:VISIBLE = YES .
    chSheet = chExcel:Workbooks:ADD .
    
    chSheet = chExcel:Sheets:ITEM(1) .
    chSheet:NAME = "Aba 1" .
    chSheet = chExcel:Sheets:ITEM(2) .
    chSheet:NAME = "Aba 2" .
    
    
    QUIT .
    

Compartilhe esta Página