Hola,
Tengo este codigo para actualizar las tablas dinamicas de mi archivo:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
RUT = Range("F3").Text
If Range("F3").Text <> RUT Then Exit Sub
RUT = Range("F3").Text
ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("Rut").CurrentPage = _
RUT
ActiveSheet.PivotTables("Tabla dinámica2").PivotFields("Rut").CurrentPage = _
RUT
End Sub
Pero tengo un problema y es el siguiente:
Las matrices de cada una de las tablas es diferente y estan en hojas distintas del libro, cuando un RUT no se encuentra en alguna de las matrices la tabla dinamica no actualiza y se quedan los datos anteriores. lo que quiciera es que si no se encuentra el RUT en alguna de las dos matrices que la tabla quede vacia (La que corresponda).
He intentado condicionando el codigo para que filtra la tabla dinamica por vacias, pero sigue mostrando los datos anteriores.
De antemano gracias por la ayuda
