Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Nota al pie de la tabla dinámica

58 views
Skip to first unread message

GRIEGO59

unread,
Oct 3, 2009, 9:04:04 AM10/3/09
to
Hola!

Quisiera poner una nota al pie de la tabla dinámica que no se borre cuando
se actualiza y crece la tabla dinámica.

La nota tiene una formula que toma información de los totales de datos de la
TD.

Gracias anticipadas,

Darío.

David

unread,
Oct 3, 2009, 12:20:01 PM10/3/09
to
Hola, Griego59.

Dos previas a darte ideas:

Primero, creo que tu problema puede resolverse fácilmente, pero a través de
código. ¿Cómo estás en programación VBA?

Segundo, cada vez que actualices la tabla dinámica, ésta crecerá o se
encogerá. Cuando la tabla se encoja, será necesario borrar todo lo que hay
por debajo de la TD para que no queden notas que ya hayan caducado. Esto no
genera conflictos, pero cuando la TD crezca, ésta ocupará el área de tu nota,
lo que generará un mensaje indicando que la tabla dinámica borrará el
contenido de algunas celdas. Este mensaje sería un tanto difícil de
desactivar. ¿Hay problema con él?

Espero tus comentarios...

- - - - - -


"GRIEGO59" escribió:

H�ctor Miguel

unread,
Oct 4, 2009, 4:10:17 AM10/4/09
to
hola, Dar�o !

> Quisiera poner una nota al pie de la tabla dinamica que no se borre cuando se actualiza y crece la tabla dinamica.
> La nota tiene una formula que toma informacion de los totales de datos de la TD.

- de que "tipo" de nota estamos hablando ? (texto en alguna celda ? o puede ser un comentario insertado ?)

- tiene que ser (precisamente) al final de la TD ? (podria convenir ponerla al principio y nunca la perderias)

- cual es "la formula" ? (como la construyes para que tome datos de los totales de la TD ?)

ve si te sirve hacer adaptaciones al siguiente comportamiento no documentado acerca de las funciones personalizadas (vba)
-> http://spreadsheetpage.com/index.php/oddity/a_user_define_function_cant_change_the_worksheet_oh_yeah/

saludos,
hector.


GRIEGO59

unread,
Oct 4, 2009, 8:35:01 PM10/4/09
to
Hola David

Se un poquitico de programación VBA y no tengo problema si aparece el
mensaje siempre que no se borre mi nota.

Gracias,

Darío

"David" escribió:

GRIEGO59

unread,
Oct 4, 2009, 8:43:01 PM10/4/09
to
Hola, Hector!


Eso que dices del comentario insertado suena interesante, o cualquier
recurso que permita poner esta nota o resumen debajo de la tabla dinámica.

La nota son 3 pares de celdas, uno debajo del otro, es decir, seis celdas,
la primera celda de cada par tiene un texto y la segunda celda de cada par
tiene una fórmula, y las fórmulas están vinculadas con los totales de la
tabla dinámica, la nota es un resumen de la tabla dinámica y dice asi:

Total base imponible =e15
Total IVA =f15
Total Factura =g15

La TD muestra los totales uno al lado del otro, pero las regulaciones
fiscales de mi pais, exige que los totales sean mostrados uno debajo del otro
y al final de la tabla.

Yo estaba viendo que si yo traslado del sector de totales al sector de filas
los siguientes campos:
Base imponible
IVA
Total Factura
La TD muestra los totales uno debajo del otro tal y como lo piden las
regulaciones fiscales de mi pais, lamentablemente, también muestra el detalle
de los datos de cada factura uno debajo del otro, y asi no me sirve.

Gracias por la ayuda,

Darío

"Héctor Miguel" escribió:

> hola, Darío !

H�ctor Miguel

unread,
Oct 4, 2009, 11:00:46 PM10/4/09
to
hola, Dar�o !

prueba moviendo a campos de fila los relacionados con las notas
y despues seleccionas los sub-totales correspondientes a las facturas y ocultas esas filas
las filas con los totales permanecen visibles ;)

si crees conveniente una macro para (re)ajustar esta caracteristica, prueba desde...
-> Pivot Table Tutorial - Show and Hide Items
http://www.contextures.com/xlPivot03.html

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

__ OP __
> La nota son 3 pares de celdas... es un resumen de la tabla dinamica y dice asi:


>
> Total base imponible =e15
> Total IVA =f15
> Total Factura =g15
>

> ... las regulaciones fiscales de mi pais, exige que los totales sean mostrados uno debajo del otro y al final de la tabla.


>
> Yo estaba viendo que si yo traslado del sector de totales al sector de filas los siguientes campos:
> Base imponible
> IVA
> Total Factura
> La TD muestra los totales uno debajo del otro tal y como lo piden las regulaciones fiscales de mi pais

> lamentablemente, tambien muestra el detalle de los datos de cada factura uno debajo del otro, y asi no me sirve.


GRIEGO59

unread,
Oct 5, 2009, 6:06:07 AM10/5/09
to
Hola!

Trasladé al area de filas los los campos con las notas pero curiosamente
ahora no aparecen los totales uno debajo del otro al final de la tabla
dinamica , como aparecian ayer, jejeje...

Darío

"Héctor Miguel" escribió:

> hola, Darío !

H�ctor Miguel

unread,
Oct 5, 2009, 1:27:44 PM10/5/09
to
hola, Dar�o !

> Traslade al area de filas los los campos con las notas pero curiosamente


> ahora no aparecen los totales uno debajo del otro al final de la tabla dinamica, como aparecian ayer, jejeje...

comprueba/corrije que en las opciones de la TD esten marcadas para "totales generales de columnas/filas"

saludos,
hector.


GRIEGO59

unread,
Oct 5, 2009, 5:25:01 PM10/5/09
to
Hola, Hecto!
Estan marcados los totales generales de filas y clumnas. : (

"Héctor Miguel" escribió:

> hola, Darío !

H�ctor Miguel

unread,
Oct 6, 2009, 1:24:06 AM10/6/09
to
hola, Dar�o !

> Estan marcados los totales generales de filas y clumnas. : (

si estas agregando campos nuevos a la TD, al ocultar uno se ocultan todos :-(

una alternativa es que los campos de tu origen se llamen como los necesitas (p.e.)
- base imponible
- IVA
- Factura

la TD se encarga de poner el texto de "Total ..." y solo tienes que ocultar los SUBtotales

o, ver si se puede realizar el calculo mediante campos/elementos calculados (revisa p.e.)
-> Pivot Tables - Custom Calculations
http://www.contextures.com/xlPivot10.html

saludos,
hector.


GRIEGO59

unread,
Oct 6, 2009, 8:24:01 AM10/6/09
to
Que contrariedad Hector,
He borrado varias veces la tabla dinámica y comienzo desde el principio,
pongo fecha, numero de factura, base imponible, iva y total factura en filas
y pongo en datos una columna que yo inventé donde todos los registros son "1"
y estan activados los totales generales de filas y columnas y subtotales de
elementos ocultos y no me salen los totales al final de página que me habian
salido anteayer. Que estaré haciendo mal?
Mientras respondes voy a buscar en la ayuda eso de campos o elementos
calculados de tabla dinámica y a tratar de traducir y entender ese link que
me recomiendas.
Gracias por tu ayuda,


"Héctor Miguel" escribió:

> hola, Darío !

H�ctor Miguel

unread,
Oct 6, 2009, 3:32:07 PM10/6/09
to
hola, Dar�o !

> He borrado varias veces la tabla dinamica y comienzo desde el principio,


> pongo fecha, numero de factura, base imponible, iva y total factura en filas

> y pongo en datos una columna que yo invente donde todos los registros son "1"

los campos de los que quieras que una TD muestre un resumen en importes deben ir en el area de datos
es decir, si en el origen de datos, los titulos "base imponible, iva y total factura" son los importes a mostrar
esos campos son los que debes disponer en el area de datos de la TD (NO en el area de filas)

> y estan activados los totales generales de filas y columnas y subtotales de elementos ocultos

> y no me salen los totales al final de pagina que me habian salido anteayer. Que estare haciendo mal?

prueba cambiando el arreglo segun el punto anterior y... comentas ?
saludos,
hector.


David

unread,
Oct 6, 2009, 9:54:01 PM10/6/09
to
La solución que te presenta Héctor está interesante, pero no quisiera dejar
el hilo pendiente, así que considera el siguiente código:

Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
Dim xC As Long
xC = Range("A3").CurrentRegion.Rows.Count
Range(Cells(xC + 3, 1), Cells(Cells.Rows.Count, 2)).ClearContents
Cells(xC + 5, 1).Value = "Total:"
Cells(xC + 5, 2).Formula = "=GetPivotData(""PrecioUnitario"",$A$3)"
End Sub

Este código lo deberías poner en la hoja donde está tu tabla dinámica.
Estoy suponiendo que tu tabla principia en la celda A3, y que la nota que
mencionas la quieres poner 3 líneas bajo la última línea de la tabla.

En mi código, estoy sumando 5 a la última línea de la tabla (2 líneas antes
de la primera fila -A3-, y 3 líneas bajo la última), y además, supongo que lo
que necesitas es el total del campo "PrecioUnitario".

Pruébalo, y adáptalo a tu caso, para ver si te es funcional.

Espero que te sirva. ¡Saludos!

GRIEGO59

unread,
Oct 7, 2009, 6:39:01 AM10/7/09
to
Muchas gracias David,
Funciona perfecto!
Agregué cuatro líneas a tu código asi,

Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
Dim xC As Long
xC = Range("A3").CurrentRegion.Rows.Count
Range(Cells(xC + 3, 1), Cells(Cells.Rows.Count, 2)).ClearContents

Cells(xC + 5, 2).Value = "Total Base imponible"
Cells(xC + 5, 1).Formula = "=GetPivotData(""Base imponible"",$A$3)"
Cells(xC + 6, 2).Value = "Total Impuesto IVA"
Cells(xC + 6, 1).Formula = "=GetPivotData(""Impuesto IVA"",$A$3)"
Cells(xC + 7, 2).Value = "Total factura"
Cells(xC + 7, 1).Formula = "=GetPivotData(""Total factura"",$A$3)"
End Sub

"David" escribió:

GRIEGO59

unread,
Oct 7, 2009, 6:49:01 AM10/7/09
to
Gracias amigo,

Funciona perfecto,

Los totales de cada campo quedan uno debajo del otro como lo exigen las

regulaciones fiscales de mi pais,

y quedan ocultas las líneas de totales de cada factura.

Lo único que no me gusta es que muestra el detalle de cada factura (Base
imponible, IVA y Total factura), tambien uno debajo del otro, debido a que la
TD muestra una sola columna para los montos y yo necesito el detalle de cada
factura uno al lado del otro y la suma del detalle de cada factura uno debajo
del otro.

Yo trate de resolver esto moviendo el cuadro gris que dice datos hacia el
cuadro que dice totales y funciona bien, es decir, se abren tres columnas y
el detalle de cada factura se muestra uno al lado del otro, pero, los totales
de cada detalle también quedan uno al lado del otro. : (

Para mi es importante hacerlo sin código porque quisiera mostrarle esto a
unos estudiantes que no conocen VBA.

"Héctor Miguel" escribió:

> hola, Darío !

H�ctor Miguel

unread,
Oct 8, 2009, 4:17:59 AM10/8/09
to
hola, Dar�o !

(si entiendo bien...) la TD muestra un "arreglo" igual que el listado de origen
si esto es correcto, no le veo sentido a la elaboracion de una TD
a menos que en los datos de origen existan facturas con mas de un "registro"
(o que en los detalles que has expuesto, algunos se hubieran quedado en el tintero ?)

saludos,
hector.

__ OP __


> Los totales de cada campo quedan uno debajo del otro como lo exigen las regulaciones fiscales de mi pais,

> y quedan ocultas las lineas de totales de cada factura.
> Lo unico que no me gusta es que muestra el detalle de cada factura (Base imponible, IVA y Total factura)


> tambien uno debajo del otro, debido a que la TD muestra una sola columna para los montos
> y yo necesito el detalle de cada factura uno al lado del otro y la suma del detalle de cada factura uno debajo del otro.
> Yo trate de resolver esto moviendo el cuadro gris que dice datos hacia el cuadro que dice totales y funciona bien

> es decir, se abren tres columnas y el detalle de cada factura se muestra uno al lado del otro

> pero, los totales de cada detalle tambien quedan uno al lado del otro. : (
> Para mi es importante hacerlo sin codigo porque quisiera mostrarle esto a unos estudiantes que no conocen VBA...


0 new messages