Filtrar tabla dinámica por valor de una celda ?
Cuando el campo que elijo filtrar es numérico en la celda F1 no me funciona el siguiente código, si me funciona si el campo no es texto,
Si alguien puede ayudarme desde ya les agradezco
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("F1")) Is Nothing Then
'En base al campo Region de la Tabla dinámica1:
With PivotTables("Tabla dinámica1").PivotFields("Talle")
'Limpiar todos los filtros
.ClearAllFilters
'Filtrar por el valor de la celda F1
On Error Resume Next
.CurrentPage = Range("F1").Value
End With
End If
End Sub
Respuesta de Isaac Reyes
1
H0la aabucossi:
No le veo problemas al código.
A ver si puedes enviar una imagen de la tabla de origen y una imagen de la tabla dinámica.
S@lu2
