Açıklamaları formülle kategorize etme ve toplama

[deamiel]

merhabalar,
excel de belirli hücrelerde yazılı belirli açıklamaları formülle toplayabilirmiyiz?
örnegin C5-O5 arası hücrelerde PD yazıyor fakat bazılarının açıklaması loder bazılarında ise robot yazıyor. istediğim loder yazanları ve robot yazanların ayrı ayrı toplanması. bu mümkünmüdür?

 

[çıtır]

Sorunuzu "örnek" excel dosyası ekleyerek sorarsanız, daha hızlı ve doğru cevaplar alabilirsiniz. Örnek excel dosyası ekleme hakkında bilgi edinmek isterseniz: https://www.excel.web.tr/threads/soru-ile-ilgili-oernek-excel-dosyasi-ekleme.174755/...

 

[deamiel]

örnek dosya eklediğim linktedir. umarım doğru olmuştur.
https://www.dosyaupload.com/ePiN

 

[çıtır]

örnek dosya eklediğim linktedir. umarım doğru olmuştur.
https://www.dosyaupload.com/ePiN

Doğrusu dosyanızdan yapılmak isteneni anlamadım.Benim anlamamam anlıyan birinin olmayaçağı anlamına gelmez.Forumda anlayan bir arkadaş cevap yazar.

 

[Merhum İdris SERDAR]

.

Dosyanız burada.

https://dosya.co/ijtdqi08xpuo/örnek_(59).xlsm.html

.

 

[deamiel]

.

Dosyanız burada.

https://dosya.co/ijtdqi08xpuo/örnek_(59).xlsm.html

.

teşekkür ederim idris SERDAR bey. Açıklamaları hücrelere taşımanız bana formülize etmede yardımcı oldu. Fakat istediğim sadece içinde PD olan hücrelerdeki açıklamalar kısmını formülize etmek. =açıklama (c5) komutunu eğer ile birleştirebiliyormuyuz?

 

[Korhan Ayhan]

Dosyanız ektedir.

Kullanıcı tanımlı fonksiyon kullanılmıştır.

 

[deamiel]

Dosyanız ektedir.

Kullanıcı tanımlı fonksiyon kullanılmıştır.

Korhan Ayhan bey malesef eklediğiniz dosyayı inceleyemedim. Altın üyelik gerekiyor.

 

[Orion1]

KTF yaptım.

DOSYAYI INDIR

Dosyanız linktedir.

Function aciklama_59(ByVal aciklamatext As Range, alan As Range) As Integer
Dim hcr As Range, say As Integer
Application.Volatile
For Each hcr In alan
    If hcr.Value = "PD" Then
        If InStr(1, hcr.Comment.Text, aciklamatext) > 0 Then
                say = say + 1
        End If
    End If
Next
aciklama_59 = say
End Function

 

[Korhan Ayhan]

Harici paylaşım linki (Silinebilir)

https://s2.dosya.tc/server9/yk7iv5/Aciklamaya_Gore_Say.rar.html