middels macro afdrukbereik bepalen van pagina met draaitabel

[Jolte]

Ik heb de volgende macro ingesteld, maar daarbij wordt de gehele draaitabel in 2 delen als afdrukbereik aangemerkt (zie bijlage)

Sub Bijwerken_draaitabellen()
'
' Het bijwerken van de draaitabellen
' Het opnieuw instellen van het afdrukbereik

'


Sheets("Print-IMM").Select
ActiveSheet.PivotTables("Draaitabel_IMM").PivotCache.Refresh

ActiveSheet.PivotTables("Draaitabel_IMM").PivotSelect "", xlDataAndLabel
ActiveSheet.PageSetup.PrintArea = Selection.Address

End Sub

Maar ik wil alleen het grote deel als afdrukbereik en niet de het bovenste kleine deel van de draaitabel. Hoe pas ik de macro aan, zodat ik alleen de inhoud van de draaitabel als afrukbereik krijg, waarbij het afdrukbereik meebeweegt met de inhoud van de draaitabel.

Alvast bedankt!

 

[jverkerk]

Wat moet je hier nu mee, met een paar plaatjes.

 

[snb]

Sub M_snb()
    PivotTables(1).TableRange2.Select
End Sub