¿ Actualizar tablas dinámicas solas?

Fernando, igual me manda el mismo error, tengo windos 2000 y excel 2000,
será por esto?

Saludos,

"Fernando Arroyo" escribió en el mensaje
news:#
Quizás es que el código en realidad no hace lo que necesitas ¿?.

He subido un ejemplo con el código funcionando:

http://www.excelesp.com/ejemplos/Ej...50518a.xls

Un saludo.


Fernando Arroyo
MS MVP - Excel


"AnGeLo" escribió en el mensaje
news:

Hola Fernando, pareciera como q me eh enredado,

Estoy poniendo el codigo en la hoja donde tengo los datos, no en la hoja q
tengo la tabla dinamica, y la hoja q coloco en el codigo en vez de HOja2

le

pongo el nombre donde tengo la tabla dinamica, y no me funciona. no c q
estaré haciendo mal, ya eh probado de varias formas, y otras no me manda
error pero no me actualiza nada.

Saludos,

Pues no sé, la verdad. Yo pensaba que funcionaría en cualquier versión. En Excel 2003 y Windows XP funciona. Si puedo, lo probaré en otras versiones de Excel.
Un saludo, y lo siento.


Fernando Arroyo
MS MVP - Excel


"AnGeLo" escribió en el mensaje news:

Fernando, igual me manda el mismo error, tengo windos 2000 y excel 2000,
será por esto?

Saludos,

Gracias Fernando,

Saludos,


"Fernando Arroyo" escribió en el mensaje
news:
Pues no sé, la verdad. Yo pensaba que funcionaría en cualquier versión. En
Excel 2003 y Windows XP funciona. Si puedo, lo probaré en otras versiones de
Excel.
Un saludo, y lo siento.


Fernando Arroyo
MS MVP - Excel


"AnGeLo" escribió en el mensaje
news:

Fernando, igual me manda el mismo error, tengo windos 2000 y excel 2000,
será por esto?

Saludos,

Ok

Funciona en 2003 y XP.

Gracias!!!!!!!!!!!!!

"Fernando Arroyo" escribió:

"Ulises" escribió en el mensaje news:
> Hola!!!
> Estoy haciendo una plantillas de ventas y quiero que una tabla dinámica se
> actualice sola respecto a los datos que están en otra hoja.
> ¿ Se puede hacer sin tener que actualizar la tabla dinámica manualmente?
> Un saludo y gracias

Prueba con el siguiente código, pero ten en cuenta que tendrás que sustituir Hoja2 por el nombre de la hoja donde se encuentre la tabla dinámica:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range(Application.ConvertFormula(Replace(Worksheets("Hoja2").PivotTables(1).PivotCache.SourceData, "F", "R"), xlR1C1, xlA1))) Is Nothing Then Worksheets("Hoja2").PivotTables(1).PivotCache.Refresh
End Sub

El código iría en el módulo de la hoja que tiene los datos de los que se nutre la tabla dinámica. Lo único que tienes que hacer para acceder a dicho módulo es click derecho sobre la etiqueta de la hoja > Ver código.
Un saludo.


Fernando Arroyo
MS MVP - Excel