üç koşula göre veri getirme

[Ergün GÖKER]

Herkese iyi geceler.
Bir çalışma yapmaktayım ve ekli dosyamdaki çalışmamda anlatmaya çalıştım istediğim verileri üç kritere EKİP-TARİH-İLÇE durumuna göre verileri çizelgeye getirmek istiyorum. Yardımlarınız için şimdiden teşekkür ederim.


http://s6.dosya.tc/server6/erj5qo/YENI_TRF.xls.html

 

[Ömer BARAN]

Merhaba Ergun Bey.

L10 hücresi için aşağıdaki formülü kullanabilirsiniz.
Diğerleri için de uyarlayabileceğinizi düşünüyorum.
.

=TOPLA.ÇARPIM(([COLOR="Red"]DEPO2!$A$8:$A$31[/COLOR]=$B$4)*(DEPO2!$B$8:$B$31=$H$4)*(DEPO2!$C$8:$C$31=$S$4)*(DEPO2!$T$8:$T$31<>"")*(DEPO2!$F$8:$F$31<>""))

Başka bir önerim de şudur; verilerinizin miktarı artacağından DEPO sayfasındaki son dolu satırı (31 sayısı) sonsatır
adıyla AD TANIMLAMAda kullanacağınız =BAĞ_DEĞ_DOLU_SAY(DEPO2!$A:$A)+6 formülüyle adlandırıp, yukarıdaki formülde
yer alan örneğin (kırmızı renklendirdiğim kısım) DEPO2!$A$8:$A$31 yerine DOLAYLI("DEPO2!A8:A"&sonsatır) şeklinde
değiştirirseniz (tabi aynı şeyi formülün diğer kısımarında da sadece sütun adlarını değiştirerek yapın) hem formülünüz
sabit kalmış olur ve hem de tüm sütunda sayma yapmak yerine sadece dolu kısımda sayma yapmış olursunuz.

 

[Ergün GÖKER]

Ömer Hocam saygılar ve merhabalar
Formülü denedim lakin toplamları almadı. neden olabilir?
Hocam şöyle anlatayım. DEPO2 sayfasında örneğin bütün rakamlar veya sayılar 1 olmayacak mesela hücre değerini 3 yapsam bile bunu 1 sayıyor.
yani dolu hücre sayısını veriyor hücre içerisindeki rakamları toplamıyor. Diyelim ki yaralı sayısı 3 olmuş olsun formül bunu 1 olarak topluyor
Umarım anlatabilmişimdir

 

[Ömer BARAN]

Formülün sonundaki ....*(DEPO2!$F$8:$F$31<>"")) kırmızı kısmı silerek sonuç alırsınız.

 

[Ergün GÖKER]

Formülün sonundaki ....*(DEPO2!$F$8:$F$31<>"")) kırmızı kısmı silerek sonuç alırsınız.

Evet Hocam Şimdi Oldu ve toplamları aldı teşekkür ederim.
Ayrıca veri çoğaldıkça formülden dolayı bir yavaşlama olurmu?
Saygılarımla

 

[Ömer BARAN]

--DOLAYLI işleviyle son satırla ilgili kısım dinamik hale getirilebilir,
--Doğrudan formül içerisindeki son satır numarası dolu satıra göre ihtiyaca göre düzeltilebilir,
--Makul bir bir üst sınır belirlenip son satır numarası olarak o sayı kullanılabilir,
-- A:A, B:B gibi tüm sütuna başvuru yapan formül kurup, EK1A sayfasının kod bölümüne hesaplamaya ilişkin aşağıdaki gibi basit bir kod eklenebilir.
Böylece sadece bu sayfa açıldığında hesaplama yapılır, bu sayfadan ayrılındığında hesaplama ELLE haline getirilmiş olur.

[FONT="Arial Narrow"][COLOR="blue"][B]Private Sub Worksheet_Activate([/B][/COLOR])
    Calculate
[B][COLOR="Blue"]End Sub[/COLOR][/B]

[B][COLOR="blue"]Private Sub Worksheet_[COLOR="Red"]De[/COLOR]activate()[/COLOR][/B]
    Application.Calculation = xlCalculationManual
[B][COLOR="Blue"]End Sub[/COLOR][/B][/FONT]