özet tablo

[acar6783]

özet tabloda
özet alınan veri değiştiğinde neden hala tablodaki filtrede eski verilerin ismi geçer
?

 

[Merhum İdris SERDAR]

.

Eski Items’ları (Öğeleri) Pivot Table’dan Kaldırmak

(Anlatım İngilizce Sürüm üzerinden)

I.Yöntem:

1.Field’in üzerinde sağ klik yaparak, Remove.
2.Pivot Table’ı Refresh edin.
3.Sözkonusu field’i yerine tekrar taşıyın.

II.Yöntem:

1.Pivot Table üzerindeki herhangi bir hücrede sağ klik yaparak. PivotTable options’ı seçin.
2.PivotTable Options diyalog kutusunda, Data tab’a klik yapın.
3.Retain Items bölümünde, açılır listeden None’ seçin.
4.OK, ve Pivot Table’ı Refresh edin.



.

 

[Murat OSMA]

Eğer veri girdikçe, silindikçe yahut değiştikçe Özet Tablo'nun otomatik olarak yenilenmesini isterseniz, bu kodları Özet Tablo'nun bulunduğu sayfanın kod kısmına yazabilirsiniz;

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column <> 1 Then Exit Sub
    ActiveSheet.PivotTables("PivotTable1").PivotCache.Refresh
End Sub

If Target.Column <> 1 Then Exit Sub
Bu satır der ki: Eğer işlem yapılan sütun, yani veri girdikçe Özet Tablo'nun değişmesini istediğiniz sütun 1.sütun (A sütunü) değil ise işlem yapma, makrodan çık.
Sadece 1. sütuna veri girdiğinizde Özet Tablo yenilenecektir. Buradaki 1 rakamı yukarıda da belirttiğim gibi A sütununu ifade eder. 1 yerine, veri girdikçe Özet Tablo'nun güncellenmesini istediğiniz 2 - 3 ve 4. sütunu ifade etmek için sütun sayısını yazabilirsiniz.
Örneğin; B sütununa veri girdikçe Özet Tablo güncellensin (yenilensin) derseniz 1 yerine 2 yazmalısınız.


ActiveSheet.PivotTables("PivotTable1").PivotCache.Refresh
Bu satırda kırmızı ile belirttiğim Özet Tablo adı ile sizin Özet Tablo adınızın aynı olması gerekir, buna dikkat edin.

 

[acar6783]

.

Eski Items’ları (Öğeleri) Pivot Table’dan Kaldırmak

(Anlatım İngilizce Sürüm üzerinden)

I.Yöntem:

1.Field’in üzerinde sağ klik yaparak, Remove.
2.Pivot Table’ı Refresh edin.
3.Sözkonusu field’i yerine tekrar taşıyın.

II.Yöntem:

1.Pivot Table üzerindeki herhangi bir hücrede sağ klik yaparak. PivotTable options’ı seçin.
2.PivotTable Options diyalog kutusunda, Data tab’a klik yapın.
3.Retain Items bölümünde, açılır listeden None’ seçin.
4.OK, ve Pivot Table’ı Refresh edin.



.

benim office türkçe olduğundan karşılık gelenleri anlayamadım

 

[Merhum İdris SERDAR]

.

Bu kodu kullanabilirsiniz.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

 Dim pvt As PivotTable
 For Each pvt In ActiveSheet.PivotTables
 pvt.PivotCache.MissingItemsLimit = xlMissingItemsNone
 pvt.PivotCache.Refresh
 Next pvt

End Sub

.

 

[alacatan]

benim office türkçe olduğundan karşılık gelenleri anlayamadım

II.Yöntem:

1.Pivot Table üzerindeki herhangi bir hücrede sağ klik (Mouse sağ tuş)yaparak. PivotTable options’ı (Pivot Tablo Seçenekleri)seçin.
2.PivotTable Options (Seçenekler) diyalog kutusunda, Data (Veri) tab’a klik yapın.
3.Retain Items (Alan Başına Korunacak Öğe Sayısı) bölümünde, açılır listeden None’ (Yok) seçin.
4.OK, (Tamam) ve Pivot Table’ı (Tablo üzerinde mouse sağ tuş-Yenile) Refresh edin.