Bağ_değ_dolu_say

[incsoft]

Hücrelerimde ='[2014-01--UFUK.xls]16'!$M$127 buna benzer formüller var ve bu formüller her hücrede 16'!$M$127,16'!$M$128,16'!$M$129.... şeklinde devam ediyor.Karşı dosyada boş olan kısımlara sonuç olarak "0" sonucunu atıyor.Aşağıda başka bir formülüm ise =BAĞ_DEĞ_DOLU_SAY(R39;R40;R42;R43;R45;R46;R48;R49;R51;R52;R54;R55;R57;R58;R60;R61;R64;R65;R67;R68;R70;R71;R73;R74;R76;R77;R79;R80;R82;R83)+BAĞ_DEĞ_DOLU_SAY(R85;R86;R88;R89;R91;R92;R94;R95;R97;R98;R100;R101;R103;R104;R106;R107;R109;R110;R112;R113) kaç tane değerin dolu olduğunu sayıyor ancak burada değerleri "0" olanlarıda saydığı için sonucum maalesef yanlış çıkıyor.BAĞ_DEĞ_DOLU_SAY formülünde değeri "0" haricinde olanları saydırabilirmiyim?


2.Bir sorum ise arkadaşlar

Bir hücrede ='15'!$G$142,='15'!$G$143... şeklinde formüllerim var ve buradaki 15 ayın 16 sı olduğunda 16 olarak değiştiriliyor.=GÜN(A17) Hücresinde o tarihinin ayın kaçıncı günü olduğunu tespit ettiriyorum.='15'!$G$142 formülünde 15 yerine =GÜN(A17) formülünü bir türlü adapte edemedim.


Teşekkürler.

 

[Mahir64]

Merhaba,

Hücreler arasındaki boşluklarda nasıl girişleriniz var? Sayı mı metin mi?

=TOPLA.ÇARPIM(--(R39:R104<>0))

 

[incsoft]

=TOPLA.ÇARPIM(--(R39:R104<>0)) bu formüller maalesef olmadı efendim.BAĞ_DEĞ_DOLU_SAY(R39;R40;R42;R43;R45;R46;R48;R49; R51;R52;R54;R55;R57;R58;R60;R61;R64;R65;R67;R68;R7 0;R71;R73;R74;R76;R77;R79;R80;R82;R83)+BAĞ_DEĞ_DOL U_SAY(R85;R86;R88;R89;R91;R92;R94;R95;R97;R98;R100 ;R101;R103;R104;R106;R107;R109;R110;R112;R113) bu hücrelerde yeri geldiğinde metin yeri geldiğinde ise sayı olmaktadır.='[2014-01--UFUK.xls]16'!$M$127 bu formüle karşılık diğer sayfadaki M127 hücresi boş ise 0 değerini atıyor.BAĞ_DEĞ_DOLU_SAY komutu sıfırlarıda saydığı için hatalı çıkıyor.Teşekkürler.

 

[Mahir64]

Şunu sorayım: R39 ile R104 aralığındaki 0 büyük değerlerimi sayacaksınız?

--

 

[usubaykan]

Merhaba;

=TOPLA.ÇARPIM(--ESAYIYSA((A1:A14))*(A1:A14<>0))

aralığını siz belirleyip denermisiniz?

 

[incsoft]

R39 ile R104 aralığında 0 dan büyük değerleri saydıracağım.Hücrelerde metinde olabiliyor rakamda.=TOPLA.ÇARPIM(--(R39:R104<>0)) bu formülde R39:R104 aralığındaki tüm değerler alındığından sonuç yanlış çıkmaktadır.

 

[incsoft]

http://turbobit.net/2r11zomcr04l.html adresine örnek ekledim arkadaşlar.

 

[cengizank]

=ÇOKEĞERSAY($R$39:$R$104;">0";$R$39:$R$104;"<>"&EMETİNSE($R$39:$R$104))

Bunu denermisin

 

[Mahir64]

Size önerilen tüm formüller istenilen sonucu vermekte. Formülleri denediniz mi? Deneyip sonuç mu alamadınız?

--

 

[incsoft]

Maalesef çözemedim arkadaşlar.Daha detaylı bir örneği http://turbobit.net/j9jgswtubx2v.html adresine ekledim.Verdiğim rahatsızlık için özür dilerim.

 

[ÖmerBey]

Öncelikle eklediğiniz dosyada belirttiğiniz çıkması istenilen sonuçlar ile yandaki tablodaki saydırılacak hücreler ararında uyuşmazlık var. Tablo esas alındı.
formül uygulanak hücrelerin tamamının aynı formatta olduğunu varsayarsak (yani 2 say, 2 sayma şeklinde) aşağıdaki formülü deneyebilirsiniz.

=TOPLA.ÇARPIM((MOD(SATIR(A1:A18);4)<3)*(MOD(SATIR(A1:A18);4)>0)*(A1:A18<>0))

 

[incsoft]

Tablonun sağındakiler sadece database amaçlı efendim.İstenilen kırmızı yerlere formülü adapte etmek.Yani sol tabloda sarı renkli yerlerde hücre değeri 0 olmayan tüm metin ve değerleri saydırmak.Formülünüzü deneyeceğim.Tşk.

 

[cengizank]

koşulların tam olarak net değil.

koşullarını net olarak belirle ki hangi birinde sayılan diğerinde sayılmayacak şeklinde yapmışsın

koşullarını kesin olarak belirler isen formül yazanlar için daha rahat olur

yeşil renkteki sayıların bir standardı var mı?.

makro yazılması gerekebilir.

 

[cengizank]

Function renklisay(hucre_data As Range, criteria As Range) As Long
    Dim datalar As Range
    Dim ccolor As Long

ccolor = criteria.Interior.ColorIndex
For Each datalar In hucre_data
    If datalar.Interior.ColorIndex = 6 Then
     If datalar > 0 Then
        renklisay = CountCcolor + 1
        End If
    End If
Next datalar
End Function

formül kullanımı
=renklisay(hücre aralığını yaz; zemin rengi hedef alınacak hücre)

=renklisay(A1:A18;A1)