FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Que componente uso para trabajar EXCEL?
Buen dia:
necesitaria saber que componente debo usar para esto: tengo una planilla en exel con este formato Nombre Direccion Telefono Juan calle 123 4511442 Pedro calle 234 4251254 ..... ......... ......... tendria que pasar estos datos a una base de datos en interbase,,, con los mismos campos, el tema seria, que componente puedo usar que sea amigable para trabajar los datos en exel? y si me comentan algo del uso se los agradecere! MUCHAS GRACIAS Y SALUDOS!! Última edición por marceloalegre fecha: 16-08-2005 a las 20:09:40. |
#2
|
|||
|
|||
Componente para trabajar con Excel
Hola:
No tienes necesidad de utilizar ningun componente te envio un codigo que te puede servir para la importacion: Código:
procedure TFormMenu.Ventas2Click(Sender: TObject); var j: Integer; begin try Excel := CreateOleObject('Excel.Application'); except Excel.Quit; showmessage('No se pudo crear el Objecto Excel.'); raise; end; if OpenDialogXls.Execute then Archivo:= OpenDialogXls.FileName else exit; Excel.Workbooks.Open(Archivo); j:= 2; repeat with InsertarProductos do begin Close; Parameters.ParamByName('@codigo').Value:= Excel.Cells[j,1].Value; Parameters.ParamByName('@descripprod').Value:= Excel.Cells[j,2].Value; Parameters.ParamByName('@idum').Value:= Excel.Cells[j,7].Value; Parameters.ParamByName('@preciopub').Value:= Excel.Cells[j,3].Value; Parameters.ParamByName('@precioemp').Value:= Excel.Cells[j,4].Value; Parameters.ParamByName('@descom').Value:= 0; Parameters.ParamByName('@periodo').Value:= 30; Parameters.ParamByName('@categoria').Value:= Excel.Cells[j,8].Value; Parameters.ParamByName('@costounitario').Value:= Excel.Cells[j,5].Value; Parameters.ParamByName('@cup').Value:= Excel.Cells[j,6].Value; Prepared:= True; ExecProc; end; inc(j); until Excel.Cells[j,2].Value = ''; Excel.quit; ShowMessage(' El fichero de productos ha sido importado exitosamente'); end; Archivo: String; Excel : Variant; y debes poner en el uses de la Unit Excel97, ComObj Ademas debes poner un OpenDialog en el formulario de importacion Saludos Luis Garcia |
#3
|
||||
|
||||
Otra opción es conectar a Excel utilizando los componentes estandard de ADO (ADOConnection y ADOTable) y podrás acceder a los datos de la hoja con los métodos estandard de una tabla.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#4
|
||||
|
||||
No me queda muy claro... alguien podria pasarme un ejemplo de como leer valores desde excel??
mi idea es simple, seria leer datos y copiarlos a una base de datos, para automatizar valores que llegar hoy por hoy a un archivo de excel y un data entry tiene que pasar todo a mano... Gracias!!! |
#5
|
||||
|
||||
he leido esta info del foro comentada por Roman:
http://www.clubdelphi.com/foros/show...ighlight=excel en la cual comenta como es el tema, pero no me funciona, les muestro mi fuente a ver que puede estar mal... |
#6
|
||||
|
||||
tambien veo en otro post que mete los datos en un stringgrid para trabajarlos... soy muy inexperto en esto.. les agradecere si alguien puede modificar mi fuente, solo necesito que los datos que estan en el exel pasen a una db interbase directamente, ya que el volumen de informacion es muy grande... gracias!
como puede hacercer? como especifico que es lo que quiero pasar, suponiendo que no conosco el limite de datos que puedo tener en el excel, o sea imaginemos A B Nombre Telefono JUAN 123 PEDRO 234 HERNAN 555 Imaginemos que no se cuantos nombres seran ingresados... como le digo que me copie las columnas a y b sun incluir el titulo Nombre y telefono ya que todo a a una db... Espero ser claro...? .... Gracias! Última edición por marceloalegre fecha: 16-08-2005 a las 22:00:52. |
#7
|
||||
|
||||
A mi me funciona perfectamente; Añadiendo un Next, cambiando el ancho de las columnas, un botoncito por aquí y eliminando el Enabled=False del form principal, pero funciona.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. Última edición por Neftali [Germán.Estévez] fecha: 30-05-2007 a las 14:17:39. |
#8
|
||||
|
||||
Neftali:
Ya entendí claramente como es el tema, no hay mejor explicación que el ejemplo!!!! MUCHAS Gracias por Ayudarme, estaba de apuros con un trabajo !!! Gracias!! |
|
|
|