Pivot Table’ın Kaynak Verisini Değiştirmek – 2
Pivot Table’ın Kaynak Verisini Değiştirmek – 2
Sheet1, Sheet2 ve Sheet3′ te yer alan veriler için:
alan1 =Sheet1!$A$1:$B$54
alan2 =Sheet2!$A$1:$B$35
alan3 =Sheet3!$A$1:$B$32
olarak alan tanımlaması yapılmıştır.
Açılır kutuya bağlı olan:
Sub kaynakveri()
With ActiveSheet.Shapes(Application.Caller).ControlFormat
ActiveSheet.PivotTables(“PivotTable1”).PivotTableWizard SourceType:=xlDatabase, SourceData:= _
.List(.Value)
End With
End Sub
makro kodları ile her değişiklikte Pivot Table – Özet Tablonun kaynak verisi değişir.
Dosya:
Pivot-table kynakverisi değişimi2
Son Yorumlar