Como faço para importar planilhas do excel no delphi ?
Boa tarde já consigo importar minha planilha no meu banco pelo Delphi 7, porém faço isso com apenas uma planilha , gostaria de saber como faço para importar 3 palnilhas de uma vez sem ter q criar um documento .xls para cada ?
Desde já agradeço !
Desde já agradeço !
Rodrigo Oliveira
Curtidas 0
Melhor post
Luiz Vichiatto
29/11/2017
As planilhas tem o mesmo padrão e são idênticas (campos e conteúdos), se a resposta for positiva, pesquise como você pode selecionar mais de um arquivo através do componente TOpenDialog que você tem que ativar a opção para múltiplos arquivos (Options/ofAllowMultiSelect = true), e tratar com loop.
Uma possibilidade ....
Seleciona os arquivos
Enquanto lista_arquivos_selecionados não é final
Faça importa_arquivo_excel
Fim Enquanto
Se você tem tipos diferentes o procedimento é o mesmo mas terá que criar os tratamentos dentro do looping
Enquanto lista_arquivos_selecionados não é final
caso nome_arquivo_excel contem "CAD" importa_cadastro
caso nome_arquivo_excel contem "FIN" importa_financeiro
Fim Enquanto
Isso para você ter as possibilidades, procure como fazer como você pode controlar com os recursos que o TOpenDialog te oferece se você está utilizando esse componente.
Espero ter ajudado!
Abraços e Sucesso!
Uma possibilidade ....
Seleciona os arquivos
Enquanto lista_arquivos_selecionados não é final
Faça importa_arquivo_excel
Fim Enquanto
Se você tem tipos diferentes o procedimento é o mesmo mas terá que criar os tratamentos dentro do looping
Enquanto lista_arquivos_selecionados não é final
caso nome_arquivo_excel contem "CAD" importa_cadastro
caso nome_arquivo_excel contem "FIN" importa_financeiro
Fim Enquanto
Isso para você ter as possibilidades, procure como fazer como você pode controlar com os recursos que o TOpenDialog te oferece se você está utilizando esse componente.
Espero ter ajudado!
Abraços e Sucesso!
GOSTEI 1