Export data to excel

Hi, 

I need to export the data from a file (number, name and address) to an excel file.

I had this done on NetExpress but now I need to "pass" to Visual Cobol WPF.

Does anyone have a small example that can send me how to create the file in excel, export the data to the cells and then save and close the file?

I already ran the forum here but could not find any answer to what I need.

 

Thanks

Alberto Ferraz

Parents
  • You can use epplus is simple to use.


    Você pode usar o epplus é simples de usar.

    exemplo.
    * declare pck as type ExcelPackage = new ExcelPackage
    declare newFile = new FileInfo("C:\temp\mynewfile.xlsx") *> cria o arquivo xlsx
    declare pck = new ExcelPackage(newFile) *> abrindo a planilha (pck)
    *> CRIANDO (ADD) uma planilha neste arquivo e obtendo a referência para meu código operá-la.
    declare ws = pck::Workbook::Worksheets::Add("Vendas")
    *>ESCREVENDO O CABECALHO

    *> Uma forma de escrever: informando endereco da celula
    set ws::Cells["A1"]::Value to "Sample 1"
    set ws::Cells["A1"]::Style::Font::Bold to true

    * //Outra forma de escrever: informando linha e coluna da celula
    * int linha = 1, coluna = 2;
    * planilha.Cells[linha, coluna].Value = "O doce, colorido e irresistível mundo dos livros";

    declare shape = ws::Drawings::AddShape("Shape1", type eShapeStyle::Rect)
    invoke shape::SetPosition(50, 200)
    invoke shape::SetSize(200, 100)
    set shape::Text to "Sample 1 saves to the Response.OutputStream"

    invoke pck::Save()
    invoke pck::Dispose.
Reply
  • You can use epplus is simple to use.


    Você pode usar o epplus é simples de usar.

    exemplo.
    * declare pck as type ExcelPackage = new ExcelPackage
    declare newFile = new FileInfo("C:\temp\mynewfile.xlsx") *> cria o arquivo xlsx
    declare pck = new ExcelPackage(newFile) *> abrindo a planilha (pck)
    *> CRIANDO (ADD) uma planilha neste arquivo e obtendo a referência para meu código operá-la.
    declare ws = pck::Workbook::Worksheets::Add("Vendas")
    *>ESCREVENDO O CABECALHO

    *> Uma forma de escrever: informando endereco da celula
    set ws::Cells["A1"]::Value to "Sample 1"
    set ws::Cells["A1"]::Style::Font::Bold to true

    * //Outra forma de escrever: informando linha e coluna da celula
    * int linha = 1, coluna = 2;
    * planilha.Cells[linha, coluna].Value = "O doce, colorido e irresistível mundo dos livros";

    declare shape = ws::Drawings::AddShape("Shape1", type eShapeStyle::Rect)
    invoke shape::SetPosition(50, 200)
    invoke shape::SetSize(200, 100)
    set shape::Text to "Sample 1 saves to the Response.OutputStream"

    invoke pck::Save()
    invoke pck::Dispose.
Children
No Data