So, brauche als VBA-Dummie auch einmal Hilfe.

Habe eine Zelle in Excel, die den Filter eines Pivots ansteuert (Makro siehe unten). Diese Zelle (hier B1) erhält die Werte durch Referenz ("=Report!BZ4") auf ein anderes Tabellenblatt (durchlaufende Werte duch Stapelverarbeitung eines zweiten Makros gesteuert).

Die Herausforderung ist, dass der Wert in B1 nicht durch Änderung des Zellinhalts durch das zweite Makro den Pivot-Filter ansteuert. Ich muss in die Zelle B1 klicken und nochmals bestätigen, damit die FIlter angesteuert werden (natürlich vollkommen ungeeignet für eine Stapelverarbeitung.

Wer weiß Rat?!       

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim xPTable As PivotTable
    Dim xPFile As PivotField
    Dim xStr As String
    On Error Resume Next
    If Intersect(Target, Range("B1")) Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
               
    Set xPTable = Worksheets("Reporting_Data_MO").PivotTables("SenseNew")
    Set xPFile = xPTable.PivotFields("OU")
    xStr = Target.Text
    xPFile.ClearAllFilters
    xPFile.CurrentPage = xStr
    Application.ScreenUpdating = True

    
End Sub