Pivot Table’ın Kaynak Verisini Değiştirmek – 1
Pivot Table’ın Kaynak Verisini Değiştirmek – 1
Sheet1, Sheet2 ve Sheet3′ te yer alan veriler için Table uygulanmıştır.
Bu nedenle, oluşan kaynak veriler; Table1, Table2 ve Table3 olarak otomtik adlar alı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:
Son Yorumlar