abrir hoja de exel

[GCASTILLO]

Amigos:

me podrian apoyar con decirme como puedo
abrir un archivo de excel desde mi aplicacion delphi, o que componentes tengo
que usar.

se usar los componentes para usar una tabla normal de datos dbf
table,
datasource
seran los mismos para abrir un archivo de Excel?

agradezco de antemano su ayuda

[Neftali [Germán.Estévez]]

Empezado por GCASTILLO

...como puedo abrir un archivo de excel desde mi aplicacion delphi, o que componentes tengo que usar.
se usar los componentes para usar una tabla normal de datos dbf
table, datasource seran los mismos para abrir un archivo de Excel?

Si tu hoja de Excel tienes Datos en formato de tabla, es decir filas y columnas con Datos y una primera fila de títulos con las columnas puedes utilizar un ADOTable para acceder a los datos.

Configura la propiedad ConectionString de la siguiente forma:

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\temp\myDataBook.xls;Extended Properties=Excel 8.0;

En la 4ª pestaña de la conexión (con título All) en Extended properties coloca uno de éstos valores:

* Excel 5.0 (para Excel 95)
* Excel 8.0 (para Excel 97, 2000, 2002 o XP)

Como Nombre de tabla coloca el nombre de la hoja donde están los datos con entre corchetes, algo así:
* [Hoja1$]
* [HojaDatos$]
* ...

Si conectas un DataSource y un DBGrid podrás ver los datos como si se tratara de una tabla estandard.

Si los datos de tu hoja de Excel no son en formato tabla, sino que es una hoja con celdas independientes y deseas acceder a ellas puedes acceder vía Automatización, para ellos puedes mirar los siguientes enlaces:

http://www.djpate.freeserve.co.uk/AutoExcl.htm
http://community.borland.com/article...,10126,00.html
http://vzone.virgin.net/graham.marsh....htm#excel.htm

[Er_Manué]

Lo puedes hacer por ejemplo, utilizando objetos OLE:

• Creas la instancia del objeto.
• Abres el archivo.
• Realizas las operaciones.
• Cierras el archivo.

Sencillo, no? jejeje

procedure TForm1.Button1Click(Sender: TObject);
var
  miExcel : Variant;
begin
  miExcel := CreateOLEObject('Excel.Application');

  miExcel.Workbooks.Open(Edit1.Text);

  // Por esta zona... o un poco más arriba o más abajo :p... ponemos las 
  // acciones que deseemos realizar con el archivo EXCEL abierto.

  miExcel.Quit;
end;

Para obtener infomación sobre el objeto OLE Excel, mira en la página http://msdn.microsoft.com/library/en...celObjects.asp

Suerte Salu2

[GCASTILLO]

Muchas Gracias a todos lo que pretaron un ratito de su tiempos
ya quedo fue muy importate sus comentario

Gil