Excel2007プログラムでピボットテーブルとの間でデータの追加/削除が可能ですか？

Question

プログラムでピボットテーブルとの間でデータの追加/削除が可能ですか？

履歴データのピボットテーブルを作成しました。 私はwhat-if分析を行う必要があります。 したがって、プログラムでデータテーブルに新しいデータを追加/削除すると、テーブルが自動的に更新されます。

最初の画像は私のピボットテーブルを示しています。

データソースに触れずにピボットテーブルにエントリを追加することはできますか？私はあなたがピボットキャッシュを更新することにより、ピボットテーブルを更新することができますエクセル2007

Answer 1

使用しています

は

、次のコードは、シート内に複数のピボットテーブルを更新することができます。

Sub UpdateDataSource() 

    Dim pt As PivotTable 
    Dim Data As String 

    'Data source of data 
    Data = "'Data'!$B:$AB" 

    For Each pt In ThisWorkbook.Sheets("Sheet1").PivotTables 
     pt.ChangePivotCache _ 
     ThisWorkbook.PivotCaches.Create(SourceType:=xlDatabase, _ 
     SourceData:=Data) 
    Next pt 

End Sub