Çözüldü Pivot Tabloda tarih aralığını iki farklı hücreden seçerek filtreleme

[tugbina]

Merhabalar;

Bir pivot tablom var ve süzme işlemini tarih aralığında yapıyor. Ancak bu aralıkların takvimden değil, belli hücrelerden alsın istiyorum.
Excel dosyası çok büyük yükleyemiyorum.
Ama ekran görüntüsünden de anlaşılabilir.
Satır etiketlerini sarı ile yuvarlak içine alınmış değerler arasına filtrelesin, bu değerler değişebilecek değerler.
Şimdiden çok teşekkür ederim.

 

[azraep]

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[tugbina]

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

Merhabalar;

Hafta sonu PC kapalı olduğundan inceleyemedim, kusura bakmayın.

Sizin kodunuzu elimdeki excele aktarmaya çalıştım, muhtemelen hücre referansları ile ilgili problemim var:

Sub Tarihler()

ilk = Format(Range("I3").Value, "dd.mm.yyyy")
son = Format(Range("I3").Value, "dd.mm.yyyy")
ActiveSheet.PivotTables("PivotTable7").PivotFields("tarih").ClearAllFilters
ActiveSheet.PivotTables("PivotTable7").PivotFields("tarih").PivotFilters.Add2 _
Type:=xlDateBetween, Value1:=ilk, Value2:=son
Range("A1").Select

End Sub

Range("A1").Select kısmında "A1"referansı nedir bu durumda? şimdiden çok teşekkür ederim.

 

[azraep]

öncelikle örnek dosya olmadığı için hücreler kendime göre düzenledim
resimdeki örneğe bakarak
ilk = I3
son = I4
A1 = E1
olarak düzeltirseniz sorun çözülür . siz başlangıç ve bitişi aynı hücre seçmişsiniz.

 

[tugbina]

öncelikle örnek dosya olmadığı için hücreler kendime göre düzenledim
resimdeki örneğe bakarak
ilk = I3
son = I4
A1 = E1
olarak düzeltirseniz sorun çözülür . siz başlangıç ve bitişi aynı hücre seçmişsiniz.

Merhabalar;

1- Çalışma sayfası sekmesinde sağa tıklayarak kod görüntüle dedim.
2- Kodu aşağıdaki gibi ekledim:

Sub Tarihler()

ilk = Format(Range("I3").Value, "dd.mm.yyyy")
son = Format(Range("I4").Value, "dd.mm.yyyy")
ActiveSheet.PivotTables("PivotTable7").PivotFields("tarih").ClearAllFilters
ActiveSheet.PivotTables("PivotTable7").PivotFields("tarih").PivotFilters.Add2 _
Type:=xlDateBetween, Value1:=ilk, Value2:=son
Range("E1").Select

End Sub


3-Run düğmesine basıp ilgili makroyu çalıştırınca bu hatayı verdi.

4-Ayrıca bir düğmeye makro olarak atayıp çalıştırdığımda da aşağıdaki hatayı verdi.


Gerçekten kafam durdu.

 

[azraep]

aynı dosyada mı yaptınız
pivot table adını kontrol edin
resimdeki zaman aralığı onda çalışmaz

 

[tugbina]

aynı dosyada mı yaptınız
pivot table adını kontrol edin
resimdeki zaman aralığı onda çalışmaz

Dosyayı maksimum küçülterek yolluyorum.
Rapor kısmında görebilirsiniz detayları.
Şifre:12457812
Tarih aralığı bu iki hücredeki herhangi iki tarih aralığı olabilir.

 

[azraep]

öncelikle sizin pivot tablonuz her şekilde sadece ocak ve eylül ayını gösteriyor.
olması gereken



önce bunu düzeltmeniz gerekiyor. ben düzeltemedim. yeni bir pivot yaparsanız sorun çözülüyor.
formülleri ise bendeki örneğinize göre
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

bunları yeni oluşturduğunuz pivotta denerseniz sorun çıkmaz sanırım.
genede yardımcı olmak için buradayız.

 

[tugbina]

Merhabalar
Bu sefer hata vermiyor ama sonuç ta vermiyor.

 

[azraep]

son dosyanızı ekleyebilirmisiniz. Kontrol için
yada pivot tabloyu seçip tablo adını kontrol eder misiniz --- Pivortable11 değilse düzeltilmesi gerek
ve Tarih (C2 hücresi) adına da bakar mısınız --- Tespit Tarihi değilse makroya yeni adı yazmalısınız

 

[tugbina]

son dosyanızı ekleyebilirmisiniz. Kontrol için
yada pivot tabloyu seçip tablo adını kontrol eder misiniz --- Pivortable11 değilse düzeltilmesi gerek
ve Tarih (C2 hücresi) adına da bakar mısınız --- Tespit Tarihi değilse makroya yeni adı yazmalısınız

Merhabalar;

Kod çalıştı teşekkürler yordum sizi, elinize sağlık.