FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Fin de datos en excel
Hola al foro, uso delphi 6, importar datos desde una Hoja excel a interbase sin problemas, mi consulta es.
¿Como determinar cual es la ultima celda con datos en la hoja excel, si este tiene filas en blanco en medio de la hoja? - Realizo la importación directa a interbase con los componentes ComObj, XLConst, ActiveX. Atte Jgutti |
#2
|
|||
|
|||
Hola
Me imagino que la tabla debe tener al menos un campo obliagatorio y si es asi entonces debes asociar la siguiente sentencia repeat with InsertarProductos do begin Close; Parameters.ParamByName('@codplu').Value:= Excel.Cells[j,1].Value; Parameters.ParamByName('@codtrasval').Value:= Excel.Cells[j,2].Value; Prepared:= True; ExecProc; end; inc(j); until Excel.Cells[j,2].Value = ''; Donde el campo codtrasval es un campo obliagatorio Saludos Luis Garcia ____________________________ La mejor manera de decir es hacer |
|
|
|