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.

piv1

Dosya:

Pivot-table kynakverisi değişimi1

You may also like...

Bir Cevap Yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir

Şu HTML etiketlerini ve özelliklerini kullanabilirsiniz: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>