Maravilha, deu Certo!

muito origado!


  ----- Original Message ----- 
  From: Jefferson - Fórum 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, June 25, 2007 12:13 AM
  Subject: Re: [delphi-br] Fw: Lendo dados do Excel


  Oi Alcione, 

  Você pode a tecnologia Ole, como no exemplo abaixo:

  var
  Excel: Variant;
  Linha: Integer;

  try
  // cria o objeto para trabalhar com o Excel
  Excel := CreateOleObject('Excel.Application');
  Excel.Visible := False;

  // abre a planilha
  Excel.WorkBooks.Open('c:\sua_planilha.xls');

  // acessa as linhas e colunas da planilha aberta 
  Excel.WorkBooks[1].Sheets[1].Cells[Linha, 1];
  Excel.WorkBooks[1].Sheets[1].Cells[Linha, 2];
  Excel.WorkBooks[1].Sheets[1].Cells[Linha, 3];
  finally
  // fecha a planilha
  Excel.WorkBooks.Close;
  end;

  Basicamente é assim que é feito o acesso às planilhas do Excel. Você 
precisará tratar os dados acima, para interagir com teu aplicativo que gravará 
os dados no banco de dados.

  Espero que isso lhe ajude.
  Boa sorte!

  Jefferson

  ----- Original Message ----- 
  From: Alcistemas Informática 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Sunday, June 24, 2007 7:46 PM
  Subject: [delphi-br] Fw: Lendo dados do Excel

  ----- Original Message ----- 
  From: Alcance Tecnologia de Sistemas 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Sunday, June 24, 2007 7:45 PM
  Subject: Lendo dados do Excel

  Preciso acessar uma pasta do excel, e ler os dados da planilha1, para que eu 
possa grava em uma tabela do firebird...

  como fazer esse acesso.. ?

  Alcione Guimarães
  e-mail: [EMAIL PROTECTED]
  Cel: 11-9515-8707
  SIP VOIP: 3301040
  SKYPE: alcistemas
  msn: [EMAIL PROTECTED]

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]



   


------------------------------------------------------------------------------


  No virus found in this incoming message.
  Checked by AVG Free Edition. 
  Version: 7.5.476 / Virus Database: 269.9.9/870 - Release Date: 26/6/2007 10:07


[As partes desta mensagem que não continham texto foram removidas]

Responder a