merhabalar ben bi belge uzerinde pivot olusturuyorum. olusturdugum pivottan cikan bir sayiyi cekip baska bir hucreye yazdiriyorum ayni pivot icinde kriterleri degistirerek farkli bir sayi elde edilebiliyor ve ben bu farkli sayiyi cekip ilk olarak cekip yazdirdigim hucrenin altina yazdirmak istiyorum ama ilk cektigi sayiyi yazdiriyor ayni yere burda yapmak istedigim ilk cektigim sayiyi 0 lama veya resetleme islemi yapabilirmiyim ???
Set rngPTData = ActiveSheet.PivotTables("PivotTable3").DataBodyRange
x = rngPTData.Rows.Count
y = rngPTData.Columns.Count
Set rngPTTot = rngPTData.Cells(1).Offset(x - 1, y - 1)
Range("K5") = rngPTTot.Value
sayiyi bu kodlarla cekiyorum ayni makroda kriter degistirip en alta bunu tekrar yazip range k6 deyince yine 1. sayii cekiyor buna cozum varmi acaba
Set rngPTData = ActiveSheet.PivotTables("PivotTable3").DataBodyRange
x = rngPTData.Rows.Count
y = rngPTData.Columns.Count
Set rngPTTot = rngPTData.Cells(1).Offset(x - 1, y - 1)
Range("K5") = rngPTTot.Value
sayiyi bu kodlarla cekiyorum ayni makroda kriter degistirip en alta bunu tekrar yazip range k6 deyince yine 1. sayii cekiyor buna cozum varmi acaba