Dolgu rengine göre toplama makrosunda renk değiştiğinde sonuç güncellenmiyor

[kartallll12]

Merhaba Excel Üstadlarım...
Aşağıdaki makro ile mesale sarı renkli hücrelerdeki sayıları toplayabiliyorum. Fakat dolgu rengini değiştirdiğim anda toplam sayıyıyı güncellemiyor. Bunu otomatik yapmak için ne yapmalıyım... Teşekkürler.



Function RenkTopla(ByVal Alan As Range, rKodu As Integer) As Long
'=RenkTopla(D418;3)
Dim H As Range
'Dim i As Integer
Dim Sonuc

For Each H In Alan
If H.Interior.ColorIndex = rKodu Then
Sonuc = Sonuc + H
End If
Next H
RenkTopla = Sonuc
End Function

 

[mcetinkaya65]

Sanırım Altgr F9 ile oluyor

 

[ÖmerFaruk]

Renk değişimi sayfa içinde bir değişiklik olarak algılanmadığı için formül kendisini güncellemez. Sayfada bir değişiklik yaparak formülün çalışmasını sağlamalısınız.
Ya da çözümü KTF yerine Makro ile yapmalısınız.

Benzer bir problem hakkında forumda daha önce açılmış başlığı inceleyebilirsiniz.
https://www.excel.web.tr/threads/renkli-satiri-toplamdan-cikarma.176521/

 

[kartallll12]

Teşekkürler