Ecxel para Paradox
Meus amigos, será que vc´s poderiam me ajudar com esta duvida que esta me matando, rs...
Quero fazer uma conversão de uma tabela que tenho já preenchida em Ecxel para uma tabelinha paradox:
No arquivo Ecxel tenho duas colunas
ID_Cargo
Nome_cargo
Na tabela Paradox tenho
ID_Cargo
Nome_cargo
Será que vc poderia me ajudar com esta questão?
Grato desde já
rodolfo@hcnet.usp.br
Quero fazer uma conversão de uma tabela que tenho já preenchida em Ecxel para uma tabelinha paradox:
No arquivo Ecxel tenho duas colunas
ID_Cargo
Nome_cargo
Na tabela Paradox tenho
ID_Cargo
Nome_cargo
Será que vc poderia me ajudar com esta questão?
Grato desde já
rodolfo@hcnet.usp.br
Rodolfoaugustus
Curtidas 0
Respostas
Skaarj
11/03/2004
:?
:arrow: http://delphiforum.icft.com.br/forum/viewtopic.php?t=36923&highlight=
:arrow: http://delphiforum.icft.com.br/forum/viewtopic.php?t=36923&highlight=
GOSTEI 0
Lucas Silva
11/03/2004
Olha que bom,
Já resolveram a sua dúvida.......
Qualquer dúvida ai me dá o toque.
Já resolveram a sua dúvida.......
Qualquer dúvida ai me dá o toque.
GOSTEI 0
Elias Jr
11/03/2004
Saudações gente, o que eu estou tentando é exatamente o contrário. Gostaria de passar de Paradox para Excel. Poderiam me mostrar um exemplo com as mesmas colunas do nosso amigo? Muito obrigado.
GOSTEI 0
Lucas Silva
11/03/2004
[quote:cad682df66=´Elias Jr´]Saudações gente, o que eu estou tentando é exatamente o contrário. Gostaria de passar de Paradox para Excel. Poderiam me mostrar um exemplo com as mesmas colunas do nosso amigo? Muito obrigado.[/quote:cad682df66]
Elias,
Este é um exemplo bem simples.... ele só passa uma linha....
Ai conforme a sua necessidade você implementa ela mais ai....
Elias,
Este é um exemplo bem simples.... ele só passa uma linha....
uses ComObj; . . . procedure TForm1.Button1Click(Sender: TObject); var excel: variant; begin excel := CreateOleObject(´Excel.Application´); excel.Workbooks.add(1); excel.Cells.Select; excel.Selection.NumberFormat := ´@´; excel.cells[1,1] := ´Teste´; excel.columns.AutoFit; excel.cells[1,1].Select; excel.visible := true; end;
Ai conforme a sua necessidade você implementa ela mais ai....
GOSTEI 0