Alguém poderia me enviar um exemplo simples de como exportar dados para o excel. Eu já vi alguns aí no forum mas queria um simples par eu implementar na minha necessidade. Obrigado
Amigo... A forma mais simples de você gerar um arquivo excel é exportando para um arquivo csv Código: output to <arquivo.csv>. put "Coluna1;Coluna2;Coluna3" skip. put "1;2;3" skip. put ""4;5;6" skip. output close. Ou utilizando o com-handle, que deve ser o exemplo que você viu: Código: DEFINE VARIABLE chexcel AS COM-HANDLE NO-UNDO. DEFINE VARIABLE chWorkBook AS COM-HANDLE NO-UNDO. DEFINE VARIABLE chPlanilha AS COM-HANDLE NO-UNDO. CREATE "excel.application" chexcel. ASSIGN chWorkBook = chExcel:workbooks:ADD(). chPlanilha = chWorkBook:workSheets(1). chPlanilha:cells(1,1):VALUE = "teste". chPlanilha:cells(1,2):VALUE = "teste 2". ch-workbook:saveas("c:\temp\teste.xls",yes,"","",no,no,no). chWorkBook:CLOSE(). IF VALID-HANDLE(chPlanilha) THEN RELEASE OBJECT chPlanilha. IF VALID-HANDLE(chWorkBook) THEN RELEASE OBJECT chWorkBook. IF VALID-HANDLE(chexcel) THEN RELEASE OBJECT chexcel.
