Pivot Tabelle per Makro aus Zellwert vorgeben
Nowc
Ich habe sehr wahrscheinlich ein simples Problem, wo ich stark auf eure Hilfe baue. Ich möchte per Makro den Filterwert einer Pivot Tabelle aus einer Celle vorgeben, welche ich Berechne.
Hier mein aufgenommes Makro. Den Wert "12" möchte ich aus Zelle G5 auf dem Worksheet "Deliveries" übernommen haben.
--------------------------------------------------------
Sub Makro8()
' Makro8 Makro
Sheets("Chart_02_TOTAL").Select
ActiveSheet.PivotTables("PivotTable2").PivotFields("week").ClearAllFilters
ActiveSheet.PivotTables("PivotTable2").PivotFields("week").CurrentPage = "12"
Range("C19").Select
End Sub
------------------------------------------------------------
Könnt ihr mir bitte helfen.
Besten Dank,
Markus
Anzeige