EXCEL DE SÜZME ÖRNEĞİ ARIYORUM

[ahbalci]

EXCEL DE SÜZME Ã?RNEÐÝ ARIYORUM

Verdiğim örnekdeki sorunu nasıl çözebilirim

Acil yardıma ihtiyacım var

Herkese şimdiden teşekkür

 

[veyselemre]

aşağıdaki fonksiyonu C30 hücresine =encok() yazarak kullanabilirsin
[vb:1:acd784380d]Function encok()
cok = Evaluate("=large(countif(c5:c28, c5:c28),1)")
For x = 5 To 28
If cok = (WorksheetFunction.CountIf([c5:c28], Cells(x, 3))) Then
encok = Cells(x, 3)
Exit Function
End If
Next
End Function[/vb:1:acd784380d]

 

[ahbalci]

Teşekkür ederim ama hata verdi
Gene de her türlü yardımınızı bekliyorum

 

[veyselemre]

ekteki örneği inceleyin