- Katılım
- 15 Mart 2005
- Mesajlar
- 42,245
- Excel Vers. ve Dili
- Microsoft 365 Tr-En 64 Bit
Selamlar,
Arkadaşlar aşağıdaki kullanıcı tanımlı fonksiyonda hücre içeriği metinse yada sayısal değer değilse fonksiyon içinde işleme alınmamasını nasıl sağlarım.
Yani veri aralığında sayısal olmayan bir değer varsa fonksiyonun bunu baz almayıp sadece sayısal değerleri işleme almasını istiyorum.
Function RHTOPLA(Aralık As Range, Kriter As Range)
Dim Hücre As Range
On Error Resume Next
For Each Hücre In Aralık
If Hücre.Interior.ColorIndex = Kriter.Interior.ColorIndex Then
Sonuç = Sonuç + Hücre.Value
End If
Next Hücre
RHTOPLA = Sonuç
End Function
Arkadaşlar aşağıdaki kullanıcı tanımlı fonksiyonda hücre içeriği metinse yada sayısal değer değilse fonksiyon içinde işleme alınmamasını nasıl sağlarım.
Yani veri aralığında sayısal olmayan bir değer varsa fonksiyonun bunu baz almayıp sadece sayısal değerleri işleme almasını istiyorum.
Function RHTOPLA(Aralık As Range, Kriter As Range)
Dim Hücre As Range
On Error Resume Next
For Each Hücre In Aralık
If Hücre.Interior.ColorIndex = Kriter.Interior.ColorIndex Then
Sonuç = Sonuç + Hücre.Value
End If
Next Hücre
RHTOPLA = Sonuç
End Function