Microsoft Excel Change is een spreadsheetprogramma . Een kenmerk van dit programma is dat je de werkbladen kunt gebruiken om gegevens eveneens slaan op de manier waarop je zou doen in een database en dan verwijzen naar het in dynamische grafische displays . Er zijn twee soorten displays die u kunt gebruiken : draaitabellen en draaigrafieken . Draaitabellen kunnen worden gebruikt voor het sorteren , filteren en een samenvatting van uw gegevens . De enige manier om de gegevensbron gebruikt door een draaitabel wijzigen als het eenmaal is aangemaakt via de wizard is om het actualiseren van VBA- code op de achtergrond . Instructies
1 Maak een draaitabel object in VBA , zodat u kunt de bron bijwerken. Kopieer de onderstaande code en zet het in je macro of functie . Dim ptMyPivotTable
als draaitabellen kopen van 2 Sluit uw draaitabel object met uw werkelijke Pivot Table . Kopieer onderstaande code .
Stel ptMyPivotTable = ActiveSheet.PivotTables ( 1 )
3 Werk de eigenschap SourceData van uw draaitabel object om de nieuwe waarden . U kunt dit doen door het kopiëren van de VBA-code verstrekt . Vervangen door uw gewenste gegevensbereik in plaats van " A1 " in het voorbeeld . PtMyPivotTable.SourceData = Range
( " A1 " ) . CurrentRegion.Address ( True , True , xlR1C1 , True ) op Twitter Als u een bereik op een ander werkblad verwijzen , kunt u de volgende code gebruiken . ptMyPivotTable.SourceData = Sheets
( " mySheetName " ) . [ A1 ] . CurrentRegion.Address ( True , True , xlR1C1 , True ) < br > Goedkope 4 Werk de gegevens daadwerkelijk wordt weergegeven in uw draaitabel met behulp van VBA opdracht hieronder . ptMyPivotTable.RefreshTable
release 5 de middelen die u gebruikt in
uw draaitabel object door het gelijk aan niets . Set ptMyPivotTable = Nothing
|
