Como passar dados de DBF para EXCEL????

[Sergio Cabral]

Presico passar alguns dados de um DBF para uma planilha de EXCEL .
Alguem sabe como fazer isso??
Por favor me ajudem em mais essa barra.

Obrigado.

[sygecom]

De uma olhada nesse link e veja se ajuda, se for xharbour tem outras funçoes usando OLE.
https://pctoledo.org/download/cop ... t&deonde=2

[Pablo César]

Se for simplesmente passar alguns dados para Excel, podes abrir o próprio DBF após ter aberto o Excel e depois seria executar o salvar como.
Também poderia ser criado de dentro da sua aplicação Clipper, um arquivo TEXTO com o conteúdo dos campos separados com "," (vírgulas) correção sobre o separador e salvar o arquivo com extensão "CSV".

[gvc]

Vc pode importar direto para o Excell. Ele abre o arquivo DBF direto.

Vc pode usar o Prometheus 2000 para exportar o DBF direto para o Excell.

Vc pode usar o formato HTML para gerar um arquivo extensão XLS e abrir o mesmo com o excell. Ele converte automaticamente o arquivo HTML para o seu formato interno. Se eu não me engano é uma contribuição do Mestre Rochinha. (Achei) https://pctoledo.org/forum/viewto ... tml#p45567

Aqui tem outra ontribuição do Mestre Rochinha:
https://pctoledo.org/forum/viewto ... =13&t=3223

Este é um exemplo com o xHarbour.

Código: Selecionar todos

FUNCTION MAIN()

    LOCAL oExcel := CREATEOBJECT( "Excel.Application" )

    LOCAL oSheet

    oExcel:WorkBooks:Open( "E:\XHARBOUR\TEST.XLS" )

    oSheet = oExcel:ActiveSheet

    ? oSheet:Cells( 1, 1 ):Value
    ? oSheet:Cells( 2, 1 ):Value
    ? oSheet:Cells( 3, 1 ):Value

    ? oSheet:Range( "A1" ):Value

    oExcel:Quit()

    RETURN NIL

[rochinha]

Amiguinhos,

Obrigado pelo "Mestre".

Para salvar em formato aceitável pelo Excel, .CSV:

- na primeira linha voce coloca os nomes dos campos, como cabeçalho.
- da segunda em diante o conteudo destes campos, exemplo:

NOME;CIDADE;EMAIL;SOMA;VALOR1;VALOR2
rochinha;sao paulo;fivolution@hotmail.com;=E2+F2;10;15

Os arquivos .CSV podem ter como separadores tanto a virgula como ponto-e-virgula. Prefira o ultimo.

Veja também que foi inserida uma fórmula.

Avalie.