Pivot Tablolarda son 6 ay ayarlama

Katılım
19 Kasım 2009
Mesajlar
16
Excel Vers. ve Dili
2007 Türkçe
Merhabalar

Su anda stajdayim ve birkac progra<min ayri ayri yaptigi grafiklerin hepsinin excelle yapilacagini idda ettim evet pivot tablolarla basardim ama bir sorunum var .Elimde iki adet dosya var bir dosyada 2009 verileri digerindede 2010 nisan ayina kadar olan veriler lazim,ihtiyacim olan sey pivot tablonun her guncellemede son 6 ayi gostermesi.Mesela elime 2010 mayis veriside gectiginde 2009 11 isime yaramayacak her guncellemede son 6 ayi gosteren bir kod varmi?

Manual olarak elle ayarlamak istedigimdede 2010 1. 2. 3. 4. ayini secemiyorum 2009 un bu aylarinida ekliyor 11 ve 12. aylarla berabwer.bu kod olursa sanirim bu sorun cozulur ve manual olarak ugrasmak zorunda kalmazlar

guncellenebilir olmasi icin kullandigim kod bu;



Private Sub Worksheet_Deactivate()
Dim pt As PivotTable
For Each pt In ActiveSheet.PivotTables
pt.RefreshTable
Next pt
End Sub

Private Sub Worksheet_Deactivate()
Dim pt As Pivo
 
Katılım
19 Kasım 2009
Mesajlar
16
Excel Vers. ve Dili
2007 Türkçe
.

ÖZET TABLOLAR (PİVOT TABLE)


Buradaki örnek dosyaları incelediniz mi?


.
Merhaba sayin yurttas
Guvenlik uyzunden sanirim resimelr gozukmuyor bilgisayarimda:(

And formuluyle birlestirdiginiz zaman araligini deneyecegim ama bendeki veriler cokcok buyuk ve veri sayfasina hicbir sekilde islem yapmiyorum cunku onklar sadece copy paste yapacak benim yaptigim seyler baska sayfalarda olacak
 
Son düzenleme:

Merhum İdris SERDAR

Moderatör
Yönetici
Katılım
21 Ekim 2005
Mesajlar
17,094
Excel Vers. ve Dili
Excel, 365 - İngilizce
Merhaba sayin yurttas
Guvenlik uyzunden sanirim resimelr gozukmuyor bilgisayarimda:(

And formuluyle birlestirdiginiz zaman araligini deneyecegim ama bendeki veriler cokcok buyuk ve veri sayfasina hicbir sekilde islem yapmiyorum cunku onklar sadece copy paste yapacak benim yaptigim seyler baska sayfalarda olacak
.

Ben dosyalardan söz ediyorum.

Siz en iyisi bir örnek dosya elkleyin, bakalım.


.
 
Katılım
19 Kasım 2009
Mesajlar
16
Excel Vers. ve Dili
2007 Türkçe
.

Ben dosyalardan söz ediyorum.

Siz en iyisi bir örnek dosya elkleyin, bakalım.


.
:(
Dosyayi eklemeye iznim yokmus
Ben su anda almanyada staj yapiyorum buyuk bir firmada
gizlilik nedeniyle yollamaya iznim yok:(
Ama ihtiyacim olan sey sizin dosyalarda bahsettiginiz gbi degil siz AND formuluyle verielrin yanina aralik belirterek dogru yanlis yaptirip pivot table da da kisitla sinrilandirmissiniz.Simdi ben soyle birsey yapiyorum internette her ay guncellenen excel verielrimiz var benim yapmayi planladigim sey ilk sayfadaki o evrileri her ay copy paste ile yenileriyle degistirdikelri zaman takip eden excel sayfalarindaki verilerin otomatik olarak degismesi(grafikler vs).Bunu yaptim ancak son 6 ay cverilerini gormek istedigijm zaman sorun ortaya cikti.MEsela
2009 yillinda 1.2.3.4. ....12. aylar mevcut 2010 yilinda ise su an sadece 1.2.3.4. aylar var.Months diye bir kisitim var pivotta ordan 1234 ve 11 12 yi sectigim zaman 2009 yilinin 1.2.3.4. aylarida ekleniyor:(Bu sorunu cozemiyorum
 

Merhum İdris SERDAR

Moderatör
Yönetici
Katılım
21 Ekim 2005
Mesajlar
17,094
Excel Vers. ve Dili
Excel, 365 - İngilizce
evet evet boyle birsey yapmam lazim sizi yormazsam bunlari nassil eklediginizi soylermisiniz?
Ana verilerin olacağı yerde bir dianmik alan yarattım.


Kod:
=OFFSET(Veri!$A$1;COUNTA(Veri!$A:$A)-1;0;-MIN(Period;COUNTA(Veri!$A:$A)-1);COUNTA(Veri!$1:$1))
Burada Period tanımlanmış alana bağlı olarak değişiyor.

Yardımcı veri sayfasında bu dianik alana bağlı olarak dizi formül ile perioda bağlı veriler geliyor.

Pivot Table verileri yardımcı sayfadan alıyor.

Priod değiştirildiğinde;

Kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim pt As PivotTable
For Each pt In ActiveSheet.PivotTables
pt.RefreshTable
Next pt
End Sub

Devreye girip, Pivot tabloyu güncelliyor.
.
 
Katılım
19 Kasım 2009
Mesajlar
16
Excel Vers. ve Dili
2007 Türkçe
Cok sagolun boyle birsey yapmaya calisacagim ama bendeki veri tablosu oyle buyukki cok zor gorundu gozume neyi nereye koyacagimi bilemedim
 
Üst