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

1 respuesta

Respuesta
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

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas