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

Duvida Conversão de probramas Office para Libre

Discussão em 'Outros/Diversos' iniciado por Francisco Santos, Maio 27, 2022.

  1. Francisco Santos

    Francisco Santos Sem Pontuação

    Boa tarde colegas,
    Estou com a seguinte duvida.

    Temos alguns programas especificos que fazem uso do Excel para geração de planilhas,
    Existe algum recurso que converta esses programas para que funcionem com o libreOffice ?
  2. hpfaff

    hpfaff Sem Pontuação

    Francisco, tem alguns exemplos para download em TDN's da TOTVS.
    Mas eu geralmente uso:

    DEFINE VARIABLE ExcelApp AS office.iface.excel.ExcelWrapper NO-UNDO.
    DEFINE VARIABLE chWSheet AS office.iface.excel.WorkSheet NO-UNDO.
    DEFINE VARIABLE chRange AS office.iface.excel.Range NO-UNDO.
    DEFINE VARIABLE chWBook AS office.iface.excel.WorkBook NO-UNDO.

    {office/office.i Excel ExcelApp}

    ExcelApp:SheetsInNewWorkbook = 1.
    chWBook = ExcelApp:Workbooks:ADD().
    chWSheet = chWBook:Sheets:ITEM(1).

    ExcelApp:range("A" + string(i-linha)):SetValue(tt-dados.nr-pedido).

    E por aí vai.... ele muda algumas formas de montar e chamadas, mas ele trabalha fazendo a conversão automática, não precisa ver se tem Office ou Libre, ele mesmo já faz as coisas.

    Tô subindo aqui alguns exemplos.

    Arquivos Anexados:

Compartilhe esta Página