Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Servers
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 14-09-2006
JuanPa1 JuanPa1 is offline
Miembro
 
Registrado: may 2006
Posts: 66
Poder: 18
JuanPa1 Va por buen camino
Funciones de Excel desde delphi

Hola a todos, quiero desde delphi utilizar la siguiente funcion de excel que me permita sumar los valores de una columna siempre que se cumpla una condicion en otra columna.
La funcion que necesito es esta, la misma que en excel me funciona perfectamente:
=SUMAR.SI(C4:C40;"=Excelente";D440)

En delphi al sumar solo los valores de una columna sin comprobar ninguna condición me funciona bien la siguiente linea:

ExcelA.Range['D'+LineString, 'D'+LineString].Value[oleVar]:='=sum(D440)';

Mi problema es que no se como deberia codificar esa funcion en delphi, le he puesto igual que la anterior funcion y la aplicacion se ejecuta pero cuando llego a la parte que debe mostrar el archivo de excel con el resultado de la funcion me da el error 'OLE error 800A03EC'.

Si alguien tiene alguna idea o sugerencia de como solucionar esto le agradeceria.
Responder Con Cita
  #2  
Antiguo 14-09-2006
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Fíjate que en el segundo caso utilzas SUM y no SUMAR. Hasta donde he visto, no puedes usar los nombres en español via OLE, debes usar los nombres en inglésde las funciones.

// Saludos
Responder Con Cita
  #3  
Antiguo 14-09-2006
JuanPa1 JuanPa1 is offline
Miembro
 
Registrado: may 2006
Posts: 66
Poder: 18
JuanPa1 Va por buen camino
Ya le he cambiado de lenguaje y me sigue dando el mismo error. Mira estoy tratando de utilizar esta funcion porque tengo el mismo problema con un TQRExpr la misma que nose como obtener el resultado de esta expresion para luego ese resultado pasarselo a excel.
La expresion es esta: Sum(if(ADOReportLogin.Answer_Code = 1, ADOReportLogin.Total, 0))
Si tienes alguna idea de como obtener el resultado de esta expresion te agradeceria, he buscado en el foro pero lo que ahi encontre no me ayudo a resolver esto.
Responder Con Cita
  #4  
Antiguo 14-09-2006
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Pero tal como la pones aquí es muy distinta de la anterior y no puede funcionar así. A Excel tienes que pasarle algo que entienda, como SUM o IF, pero no puedes pasarle directamente código Delphi como ADOReportLogin.Answer_Code o ADOReportLogin.Total.

// Saludos
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Imprimir desde Delphi a excel mayte mtz SQL 6 25-10-2006 20:38:29
Manipulación de funciones de excel desde delphi5 vick Conexión con bases de datos 1 26-10-2005 04:08:09
Manipular las funciones de Excel desde Delphi5 vick Servers 3 26-10-2005 04:01:09
a excel desde delphi SEBAC_28 Servers 3 21-12-2004 15:47:01
Formato Excel Desde Delphi Bagy Servers 1 22-06-2004 08:45:08


La franja horaria es GMT +2. Ahora son las 22:51:02.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi