Filtro en una tabla pivote por medio de macro
Tengo una macro que me crea un pivote, pero no se como programar para que siempre se filtre la información del día anterior, por ejemplo, ejecuto la macro el día martes y necesito que en el pivote se filtre la información del lunes.
1 Respuesta
Respuesta
Los filtros con fechas son un problema, te recomiendo que uses la grabadora de macro para ver como es el formato, y luego reemplaces el código de la fecha (ya que quedará fijo ese valor) por algo parecido a lo siguiente:
Sub Macro1()
Dim fDia As Date
fDia = Date - 1
ActiveSheet.PivotTables("TablaDinámica1").PivotFields("Fecha").ClearAllFilters
ActiveSheet.PivotTables("TablaDinámica1").PivotFields("Fecha").CurrentPage = _
Format(fDia, "mm/dd/yyyy")
End Sub
Salu2