KTF niçin uyarılma ister?

[Tevfik_Kursun]

Merhaba Arkadaşlar,
Bu makro, Vardar07 hocanın 13.12.2016 da yazdığı bir KTF dir. Çok kullanışlı. Gösterdiğiniz zemin rengine sahip hücreleri sayar. Şimdi gerek oldu. İsrarla tetikleme (uyarılma) istiyor, yoksa kendi kendine tesbit edemiyor. Nedenini anlayamadım.
Saygılarımla

Function renksay(range_data As Range, criteria As Range) As Long
    Dim datax As Range
    Dim xcolor As Long
    Set sw = Sheets("Sayfa1") ' Sayım yapılacak SAYFA adı.
    xcolor = criteria.Interior.ColorIndex
        For Each datax In range_data
              If datax.Interior.ColorIndex = xcolor Then
                renksay = renksay + 1
              End If
        Next datax
End Function

=renksay(D13:T13;$V$9)

şeklinde sayabiliyor.

 

[Tevfik_Kursun]

Merhaba,
İlgilerinize teşekkür ederim. Sayfayı otomatik olarak uyarmak gerekiyormuş.
https://excel.web.tr/threads/otomatik-ktf-aktivasyonu.176684/#post-968285
Saygılarımla

 

[Tevfik_Kursun]

Merhaba,
Ben hata yapmışım, gayet güzel çalışıyor.
Yine de arşivinde tanıtılabilen hücre renkleriyle ve hücredeki yazı renkleriyle düzgün çalışan KTF olan arkadaşlar paylaşırlarsa çok makbule geçer.
Saygılarımla