Automatic Refresh of Pivot Table Data.

[ExcelVisual]

Hello!
To update the data visualization on all charts when using slicers with pivot table filters, I have to click twice to ensure all data refreshes without delay. However, this would be unacceptable for the dashboard user. Therefore, I used this VBA code for automatic pivot table refresh:

Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
    Application.ScreenUpdating = False
    Application.ScreenUpdating = True
End Sub

The problem is that this template should not contain macros and should only use formulas and pivot tables. Question: Is there a solution to ensure that the data updates on all charts with the first click on a slicer—without using macros? For some reason, Excel only updates everything after the second click on the slicer button. Example: