Limpiar desplegable en Tabla Combinada

06/07/2007 - 09:03 por maap | Informe spam
Hola, mi consulta es la siguiente.
Tengo una tabla combinada basada en una hoja diaria que voy
actualizando, por lo que para un mismo campo hay valores que aparecen
y valores que desaparecen.
El problema que tengo es que después de pasados casi dos meses, en
(por ejemplo) el campo fecha que utilizo como cirterio para
clasificación de columnas, me sigue apareciendo en el desplegable
fechas pasadas que ya no están en la tabla original (y nunca estarán).
¿Cómo puedo hacer para que me ofrezca en el desplegable para filtrar
sólamente campos que existan realmente y elimine los demás.?

Espero haberme explicado bien, si no es así no dudeis en pedirme
alguna aclaración.

Muchas gracias a todos.
 

Leer las respuestas

#1 maap
06/07/2007 - 12:19 | Informe spam
On 6 jul, 09:03, maap wrote:
Hola, mi consulta es la siguiente.
Tengo una tabla combinada basada en una hoja diaria que voy
actualizando, por lo que para un mismo campo hay valores que aparecen
y valores que desaparecen.
El problema que tengo es que después de pasados casi dos meses, en
(por ejemplo) el campo fecha que utilizo como cirterio para
clasificación de columnas, me sigue apareciendo en el desplegable
fechas pasadas que ya no están en la tabla original (y nunca estarán).
¿Cómo puedo hacer para que me ofrezca en el desplegable para filtrar
sólamente campos que existan realmente y elimine los demás.?

Espero haberme explicado bien, si no es así no dudeis en pedirme
alguna aclaración.

Muchas gracias a todos.



Me respondo yo mismo (por que buscaré siempre después de postear en
vez de hacerlo antes)

Sólo hay que ejecutar el siguiente código.

Sub DeleteMissingItems2002All()
'prevents unused items in non-OLAP PivotTables

'in Excel 2002 and later versions
'If unused items already exist,
'run this macro then refresh the table
Dim pt As PivotTable
Dim ws As Worksheet

For Each ws In ActiveWorkbook.Worksheets
For Each pt In ws.PivotTables
pt.PivotCache.MissingItemsLimit = xlMissingItemsNone
pt.PivotCache.Refresh
Next pt
Next ws

End Sub


Saludos.

Preguntas similares