Draaitabel verversen bij Openen bestand

[Gert Bouwmeeste]

Goedemorgen,

Ik zoek naar een macro die een draaitabel ververst wanneer het bestand wordt geopend. Ik heb deze code geprobeerd

Private Sub Workbook_Open()

PivotTables("Draaitabel").PivotCache.Refresh

End Sub

De macro heb ik in "This Workbook" neergezet. Dat werkt niet, ik krijg een foutmelding 1004.

Deze werkt ook niet:

  Sheets("DT").Select
    ActiveWorkbook.RefreshAll
    Sheets("Gegevens").Select

Wat doe ik verkeerd?

 

[VenA]

Dat kan ook zonder macro. In de tab gegevens van de opties kan je aangeven dat de draaitabel vernieuwd moet worden bij het openen van het bestand.

De foutmelding krijg je omdat je het blad niet aangeeft waar de draaitabel staat.

Blad2.PivotTables("Draaitabel1").PivotCache.Refresh

 

[HSV]

Zou moeten voldoen.

Thisworkbook.refreshall

 

[Gert Bouwmeeste]

Dank je wel!