Page 1 of 1

Subtotalizar varias columnas en clase TExcelScript

Posted: Tue Dec 16, 2008 3:21 pm
by artu0407
Hola gente vengo usando la clase TExcelScript para generar reportes a excel uso el metodo subtotal para sumar una columna pero como hacer
para subtotalizar mas de una columna

la sintaxis que uso es:

obj := TExcelScript():New()
obj : Say(1,1,datos)
obj : Say(2,1,datos)
....
...

obj:Subtotal(cRango,1,1,14)

14= es la columna que va a subtotalizar ¿no puedo poner otra columna mas?

gracias x sus reponses
Arturo.

Re: Subtotalizar varias columnas en clase TExcelScript

Posted: Tue Dec 16, 2008 10:03 pm
by mmercado
artu0407 wrote: obj:Subtotal(cRango,1,1,14)

14= es la columna que va a subtotalizar ¿no puedo poner otra columna mas?
Hola Arturo:

Prueba lo siguiente:

Code: Select all

   #define xlSum -4157
   oSheet:Range( cRange ):SubTotal( nControlCol, xlSum, { 14, 15, etc }  )
Saludos.

Manuel Mercado

Re: Subtotalizar varias columnas en clase TExcelScript

Posted: Wed Dec 17, 2008 3:26 am
by artu0407
mmercado wrote:
artu0407 wrote: obj:Subtotal(cRango,1,1,14)

14= es la columna que va a subtotalizar ¿no puedo poner otra columna mas?
Hola Arturo:

Prueba lo siguiente:

Code: Select all

   #define xlSum -4157
   oSheet:Range( cRange ):SubTotal( nControlCol, xlSum, { 14, 15, etc }  )
Saludos.

Manuel Mercado
Gracias Manuel por responder modifique la clase y le puse de parametro
el arreglo pero ahora me sale " no se puede determinar que fila o que seleccion de la lista contiene los rotulos de columnas requeridas para este comando"

Intente usar la clase Repexcel pero no lo logro compilarlo
gracias