Draaitabel automatisch bijwerken

[Roy3001]

Beste leden,

Ik heb een bestandje waarbij de draaitabel automatisch moet worden bijgewerkt als ik het tabblad met de draaitabel benader.

Ik heb het geprobeerd met de volgende code, maar ik krijg het niet aan de gang:

Private Sub Worksheet_Activate()
PivotTables("Draaitabel4").PivotCache.Refresh
End Sub

Wie kan me helpen?
Alvast bedankt

Moet werken in Excel 2013.

Grtz,

Roy

 

[VenA]

Zo te zien gebruik je PowerPivot. Wat op zich wel handig was om erbij te vermelden. Het schijnt heel simpel te zijn.

ActiveWorkbook.Model.Refresh

of het waar is kan ik niet voor je uitproberen (geen XL2013 en geen PowerPivot). http://www.tomgleeson.ie/posts/201404/PowerPivotVBARefresh.html