DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
=ksay(A1;"aa")
Function ksay(Hcr As Range, Aranan As String) As Integer
Dim d As Variant
Dim i As Integer
Dim j As Integer
Aranan = UCase(Replace(Replace(Aranan, "i", "İ"), "ı", "I"))
d = Split(Hcr, Chr(10))
For i = 0 To UBound(d)
If UCase(Replace(Replace(d(i), "i", "İ"), "ı", "I")) = Aranan Then j = j + 1
Next i
ksay = j
End Function
Sayın tugkan,Ali hocam, B2 hücresindeki aa değerini formülle bulabilir miyiz?
Sayın Ali hocam,Sayın tugkan,
aa değerini, bulma derken tam olarak ne demek istediğinizi anlayamadım.