İki Satır Aralığındaki Benzersiz Değerleri Saydırma

[dnmtnk]

Arkadaşlar resimde önizlemesi var. İki satır arasındaki benzersiz değerleri nasıl saydırabilirim? Boşlukları ve 0 değerlerini saymamalı

 

[asi_kral]

Dosya ekler misiniz_?
Ayrıca Formül mü istiyorsunuz yoksa makro mu_?

 

[dnmtnk]

formül istiyorum mümkünse. dosya ektedir. teşekkürler...

 

[f_desat]

Çalışmanız formül ile yapıldı ektedir.

 

[asi_kral]

formül istiyorum mümkünse. dosya ektedir. teşekkürler...

Merhaba
Bende makro ile çözüm buldum.

Option Explicit
Sub mükkerrer_say_1967()
'Konu       :   Mükerrer Sayma
'Mail       :   m.batu.1967@gmail.com
'coder By   :   asi_kral_1967
Dim asi, kral
Dim a
Application.ScreenUpdating = False
a = 0
For kral = 5 To Cells(Rows.Count, "B").End(xlUp).Row
For asi = 3 To 17
If Cells(kral, "B") <> "" Then
If Cells(kral, asi) <> 0 Then
If WorksheetFunction.CountIf(Range("C" & kral & ":" & Cells(kral, asi).Address), _
Cells(kral, asi)) = 1 Then
a = a + 1
End If
End If
End If
Next
Cells(kral, "R") = a
Next
Application.ScreenUpdating = True
MsgBox "İşlem Tamam", vbInformation, "asi_kral_1967"
End Sub

Dosyanız Ekte

 

[dnmtnk]

Çalışmanız formül ile yapıldı ektedir.

teşekkürler fakat istemiş olduğum şey benzersiz değerleri saymasıydı.

C5:Q5 aralığında 10100 değeri 2 kez girilmiş. bunu 1 kez saymasını istiyorum. Yani orada sonuç 9 vermesi gerekiyor.

sizin formülünüz ile =EĞERSAY(C25:Q25;">0") formülü aynı işlemi yapıyor benzer olanları farklıymış gibi sayıyor. Ben ise benzer olanları 1 kez saymasını istiyorum.

 

[erkan664]

arkadaşlar excelde mouseun sağ kliki çalışmıyor. yardım edebilir misiniz?

 

[dnmtnk]

formül ile saydıramıyor muyuz arkadaşlar?

 

[Mahir64]

formül ile saydıramıyor muyuz arkadaşlar?

Merhaba,
Deneyiniz.

=TOPLA.ÇARPIM((C5:Q5<>"")/EĞERSAY(C5:Q5;C5:Q5&""))

 

[f_desat]

Sayın dnmtnk,

Ekteki her iki formülde 9 sonucunu veriyor senin boş olarak gördüğün hücreler içinde "0" değerleri var boş hücre içlerini silersen doğru sonucu alırsın.
ALTERNATİF:1
R5 ALANI İÇİN 1 FORMÜL:
=SUM(IF(FREQUENCY(C5:Q5;C5:Q5)>0;1))
ALTERNATİF:2
R5 ALANI İÇİN 2. FORMÜL bu formül çalışabilmesi için ctrl+shift+enter basarak formül başına ve sonuna {} bu sembolleri çıkartman gerekli yazarak değil yani ..ctrl+shit+enter
=COUNT(1/FREQUENCY(IF($C$5:$Q$5<>"";MATCH($C$5:$Q$5;$C$5:$Q$5;0));COLUMN($C$5:$Q$5)-COLUMN($C$5)+1))

her iki formülde aynı sonucu 9'u verecektir.

 

[dnmtnk]

Merhaba,
Deneyiniz.

=TOPLA.ÇARPIM((C5:Q5<>"")/EĞERSAY(C5:Q5;C5:Q5&""))

Mahir bey'in vermiş olduğu formül ile çözdüm sorunumu ancak f_desat rumuzlu kullanıcının demiş olduğu

Sayın dnmtnk,

Ekteki her iki formülde 9 sonucunu veriyor senin boş olarak gördüğün hücreler içinde "0" değerleri var boş hücre içlerini silersen doğru sonucu alırsın.

hücreler içindeki "0" değerlerini kaldırmam gerektiğinin farkına vardım onu da
C5:Q5 aralığındaki tüm hücrelere

=EĞER('1.Gün'!B6="";"";'1.Gün'!B6)

formülünü girerek çözdüm.

ilgi ve alakalarınızdan ötürü çok teşekkür eder iyi çalışmalar dilerim. saolun arkadaşlar...

 

[Mahir64]

Mahir bey'in vermiş olduğu formül ile çözdüm sorunumu ancak f_desat rumuzlu kullanıcının demiş olduğu


hücreler içindeki "0" değerlerini kaldırmam gerektiğinin farkına vardım onu da
C5:Q5 aralığındaki tüm hücrelere

formülünü girerek çözdüm.

ilgi ve alakalarınızdan ötürü çok teşekkür eder iyi çalışmalar dilerim. saolun arkadaşlar...

Hücrelerdeki sıfır değerlerini kaldırdığınızda diğer formüllerde işlem yapacaktır.
İyi çalışmalar.