Bir sutundaki çift kayıtların adedini veren formül

[mesudiye_052]

=BAĞ_DEĞ_DOLU_SAY(A1:A10)-(TOPLA(EĞER(EĞERSAY(A1:A10;A1:A10)=1;EĞERSAY(A1:A10;A1:A10);0)))

Enter demeden ctrl+shift+enter tuşlarına sırayla basın ve şu şekli alacak
{=BAĞ_DEĞ_DOLU_SAY(A1:A10)-(TOPLA(EĞER(EĞERSAY(A1:A10;A1:A10)=1;EĞERSAY(A1:A10;A1:A10);0)))}
işe yaraması dileğiyle

 

[NEMAKSAN]

Güzel bir çalışma
Teşekkürler

 

[Necdet]

Formülü biraz kısaltalım, alternatif olsun

=COUNTIF(A1:A10;A1:A10)

=EĞERSAY(A1:A10;A1:A10)

 

[mesudiye_052]

Sayın Necdet_Yesertener,
mesala
A
1 ali
2 mehmet
3 ali
4 sezai
5 niyazi
6 sezai

yukarıdaki yazmış olduğum formül

toplam tekrarlanan değerler 4 şeklinde bulan bir formül

 

[hamitcan]

kullanıcı tanımlı bir fonksiyon yaptım işinizi görür herhalde.Sadece kolon numarasını yazmanız yeterli.

Public Function say(kolon As Integer)
son = Application.CountA(Columns(kolon))
For t = 1 To son
If WorksheetFunction.CountIf(Columns(kolon), Cells(t, kolon)) > 1 Then
topla = topla + 1
End If
Next
say = topla
End Function

 

[mesudiye_052]

Sayın hamitcan,
emeğiniz için teşekkür ederim
saygılarla