Page 1 of 1

Error fórmula Excel OLE

Posted: Tue Jan 21, 2020 10:58 pm
by jparada
Hola,
Intentando escribir una fórmula con OLE/COM a Excel me marca error, estoy intentado así:

Code: Select all

oSheet:Cells( nLinea, 04):Formula = "=SUMA(R[-" + hb_NToS(nFila) + "]C:R[-1]C)"
oSheet:Cells( nLinea, 04):FormulaR1C1 = "=SUMA(R[-" + hb_NToS(nFila) + "]C:R[-1]C)"
Alguien ha realizado alguna prueba con fórmulas que me pueda apoyar?.

Gracias.

Saludos,
Javier

Re: Error fórmula Excel OLE

Posted: Wed Jan 22, 2020 1:12 am
by danielmaximiliano
No será
:fórmula :=

Re: Error fórmula Excel OLE

Posted: Wed Jan 22, 2020 2:49 am
by jparada
danielmaximiliano wrote: Wed Jan 22, 2020 1:12 am No será
:fórmula :=
Es broma :?:, lo has intentado tú así...

Re: Error fórmula Excel OLE

Posted: Wed Jan 22, 2020 12:53 pm
by danielmaximiliano
jparada wrote: Wed Jan 22, 2020 2:49 am
danielmaximiliano wrote: Wed Jan 22, 2020 1:12 am No será
:fórmula :=
Es broma :?:, lo has intentado tú así...
No sabemos que error te da en la asignacion de la formula. no soy usuario de Planillas de Excel o OpenOffice pero veo un error que es lo que indique.
intentamos ayudar con lo poco que se ve

Re: Error fórmula Excel OLE

Posted: Wed Jan 22, 2020 2:31 pm
by edk
jparada wrote: Tue Jan 21, 2020 10:58 pm Hola,
Intentando escribir una fórmula con OLE/COM a Excel me marca error, estoy intentado así:

Code: Select all

oSheet:Cells( nLinea, 04):Formula = "=SUMA(R[-" + hb_NToS(nFila) + "]C:R[-1]C)"
oSheet:Cells( nLinea, 04):FormulaR1C1 = "=SUMA(R[-" + hb_NToS(nFila) + "]C:R[-1]C)"
Alguien ha realizado alguna prueba con fórmulas que me pueda apoyar?.

Gracias.

Saludos,
Javier
Me parece que la fórmula Excel =SUMA(R[-nn]C:R[-1]C) es incorrecta.
Además, la fórmula =SUMA(R1:C1) sería incorrecta.
El correcto es ciertamente =SUMA(C1:R1)

A mí me funciona:

Code: Select all

oSheet:Cells(nRow,nCol):Formula := "=SUMA("+cCol+ALLTRIM(STR(nRowBegin))+":"+cCol+ALLTRIM(STR(nRowEnd))+")"

Re: Error fórmula Excel OLE

Posted: Wed Jan 22, 2020 10:55 pm
by jparada
Hola,
Esto me funcionó:

Code: Select all

oSheet:Cells( nLinea,04):Value := "=SUMA(D" + hb_NToS(nRow) + ":D" + hb_NToS((nRow+nFila)-1) + ")
En alguna oportunidad voy a validar lo que comentan acerca de la fórmula R1C1.

Gracias.

Saludos,
Javier