FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#2
|
|||
|
|||
Hola amigos, disculpen otra pregunta, ¿como puedo elegir el rango de F13:Q39 con el código que nos proporciono Caro?.
Es decir, tengo un formato de excel ya estandarizado pero los datos que necesito estan en este rango: F G H I J K L M N Ñ O P Q 13 14 15 .. ... ... 39 En el código aparece esto: Código:
RangoMatriz := Excel.Range['A1', Excel.Cells.Item[CantRow,CantCol]].Value; Saludos a todos. |
#3
|
||||
|
||||
Cita:
__________________
Web |
#4
|
||||
|
||||
Bueno estuve probando ADO y logre esto:
Aqui le paso al ADOConnection1 el archivo de excel que necesite por medio de un Edit... y luego solo lo abro, hasta funciona mas rapido ; la pregunta del millon sigue siendo, una vez tenga este problema solucionado que dll y bpl necesito para el instalador... Por cierto gracias por el codigo... PD: Aca usamos caritas para todo
__________________
Web |
#5
|
||||
|
||||
Hola axlrafael, si necesitas desde el rango F13:Q39, en Range le dices que comience en F13 y cambias en tu ciclos for la cantidad de columnas y filas.
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#6
|
||||
|
||||
Importar archivo excel a un stringgrid LAZARUS IDE
Hola que tal amigos espero que me puedan ayudar con lo siguiente:
Bueno quiero abrir un archivo excel en un stringgrid con Lazarus IDE encontre algo similar en este foro pero me marca un error les enseño el codigo:
Bien es en estas líneas de codigo en las que me aparece el error:
Error: Incompatible types: got "AnsiString" expected "LongInt"
Error: Incompatible types: got "Constant String" expected "LongInt" Bueno intente esto:
Ejecuta normal pero al dar click en el boton aparece el mensaje: El proyecto a lanzado una excepcion 'EOLeExceptionEOLeException' con el mensaje: no se encontro "??????x.xlsx" Comprube ortografia y verificar si la ubicación es correcta. La ruta es totalmente correcta pero no se lo que pasa por favor si me pueden ayudar con esto. Gracias Última edición por roman fecha: 10-01-2012 a las 00:18:02. Razón: Corregir etiquetas [delphi] |
#7
|
||||
|
||||
#8
|
||||
|
||||
Ok Casimiro ya esta dame una sugerencia pues en que estoy fallando estoy usando Lazarus IDE
|
#9
|
||||
|
||||
Cita:
Mas caritas Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. Última edición por Caro fecha: 28-05-2008 a las 15:29:41. |
#11
|
||||
|
||||
Tengo una pregunta
Hola a todos, estoy leyendo todas las hojas de mi documento de excel, pero si encuentra una hoja vacía me sale un Access Violation al intentar leer la primera celda, como puedo verificar si una hoja esta vacía y asi no leerla, muchísimas gracias por adelantado.
Axrafael, para que no sea muy estatico, puedes obtener también las filas y columnas de tu rango y quedaria asi.
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#12
|
||||
|
||||
Cita:
puedo acceder a la primera celda de cada hoja aun estando vacías. // Saludos |
#13
|
||||
|
||||
Usa adoconection
Usa un componente AdoConection y un ADODataSet, en la cadena de conexion pone todo esto y en source el archivo excel.
ADOConnection1.ConectionString:= Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=F:\Company\Solicitud\Solicitud.xls;Mode=Share Deny None;Extended Properties=Excel 8.0;Persist Security Info=False;Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDBatabase Password="";Jet OLEDB:Engine Type=35;Jet OLEDBatabase Locking Mode=0;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDBon't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False Tambien podes poner como una constante y con format(cte_cadenadeconxion,[farchivoexcel]) y trabajas como una tabla y grillas normal, incluso podes acceder a los campos con fieldbyname si sabes como se llaman de antemano. Enlaza en el AdoConection con ADODataSet y en ADODataSet1.CommandText tenes las pestañas del archivo
__________________
Maestro no solo es el que conoce sino el que comparte lo que sabe. |
#14
|
|||
|
|||
Muchas Gracias por la Data, ahora lo pruebo..
Saludos |
#15
|
|||
|
|||
Hola
Tengo un problema con el código que escribió Caro en la primera pagina (era el siguiente):
Concretamente mi problema esta en esta línea:
El error es Undeclared identifier 'CreateOleObject' Además, a intervalos regulares me aparece el mensage de error: Unable to cast object of type 'Borland.Delphi.VariantType' to type 'Borland.Delphi.Unit' Y no se como solucionar ninguna de las dos cosas. Tal vez sea algo muy básico, ya que a los demas que han probado el código les ha funcionado perfectamente. Alguna idea de por dónde puede ir el error? Mi intención es leer el documento excel para luego ir guardando la información listada. Uso delphi 2007, por si es de utilidad saberlo. Sinceramente estoy bastante perdido. Gracias por adelantado. |
#16
|
|||
|
|||
Ok, ya suponía que estaba cometiendo un error muy básico
Me faltaba completar los "uses"! Vaya noob estoy hecho. Aunque el error: Unable to cast object of type 'Borland.Delphi.VariantType' to type 'Borland.Delphi.Unit' Sigue apareciendo... Es bastante molesto, aunque el código se compila sin problemas. Si alguien sabe como puedo solucionarlo, se lo agradecería. |
#17
|
|||
|
|||
Hola,
he tratado de correr el ejemplo de Caro y me da error en la linea:
el error dice 'Error en el metodo Activate de la clase range'. Si quito la linea, entonces CantRow y CantCol me dan 1 y 1 respectivamente. Que debo hacer? gracias |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
importar datos de excel a firebird | Choclito | Varios | 6 | 06-02-2007 02:26:10 |
como importar informacion a mi base de datos desde un disket | ibbeth | Firebird e Interbase | 13 | 20-01-2007 10:18:38 |
Importar desde Excel | Lucas_diaz1810 | Conexión con bases de datos | 5 | 03-11-2006 18:15:26 |
Importar desde Excel | LucasArgentino | SQL | 1 | 24-12-2003 17:33:26 |
importar datos de excel a mi aplicacion | squenda | Varios | 2 | 11-12-2003 03:33:32 |
|