Buen dia, estoy trabajando con una tabla dinámica y estoy haciendo macros para filtrar ingresando los datos en una celda. Si solo necesito filtrar por un valor con esta macro lo puedo resolver
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C28:C35")) Is Nothing Then
With PivotTables("Tabla dinámica9").PivotFields("Month")
On Error Resume Next
.CurrentPage = Range("C28").Value
End With
End If
End Sub
Eso es considerado que en la tabla solo quiero ver un mes, pero si quisiera dos o mas veces, la idea es ingresar esos meses en una celda y que esos datos los tome como ejemplo. Hice una prueba con la grabadora de macros y lo hace al revez osea solo recibe los datos que no quiero ver, en mi caso yo quiero recibir los datos que quiero ver.
Gracias de antemano
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Buen dia, estoy trabajando con una tabla dinámica y estoy haciendo macros para filtrar ingresando los datos en una celda. Si solo necesito filtrar por un valor con esta macro lo puedo resolver
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("C28:C35")) Is Nothing Then With PivotTables("Tabla dinámica9").PivotFields("Month") On Error Resume Next .CurrentPage = Range("C28").Value End With End If End Sub
Eso es considerado que en la tabla solo quiero ver un mes, pero si quisiera dos o mas veces, la idea es ingresar esos meses en una celda y que esos datos los tome como ejemplo. Hice una prueba con la grabadora de macros y lo hace al revez osea solo recibe los datos que no quiero ver, en mi caso yo quiero recibir los datos que quiero ver.
Gracias de antemano