Licz.jeżeli tylko na nieukrytych wierszach
: pt wrz 13, 2019 9:51 pm
Witam
Potrzebuję zastosować funkcję licz.jeżeli na kolumnie, jednak chciałabym wykonać ją tylko i wyłącznie na komórkach, które są widoczne.
Wcześniej stosuję autofiltr (na innej kolumnie).
Wiem, że istnieje funkcja sumy.częściowe, ale nie można jej użyć łącznie z funkcją licz.jeżeli.
Znalazłam rozwiązanie dla tego problemu w postaci makra, ale napisanego w vba:
Function CountIfVisible(MyRange As Range, Compare as Range) As Long
Dim c As Range
For Each c In MyRange
If (c.Value = Compare.Value) And (c.EntireRow.Hidden = False) Then
CountIfVisible = CountIfVisible + 1
End If
Next c
End Function
Czy ktoś mógłby powiedzieć mi w jaki sposób napisać takie makro w basicu?
Albo czy istnieje jakieś inne rozwiązanie mojego problemu?
Pozdrawiam
Kasia
Potrzebuję zastosować funkcję licz.jeżeli na kolumnie, jednak chciałabym wykonać ją tylko i wyłącznie na komórkach, które są widoczne.
Wcześniej stosuję autofiltr (na innej kolumnie).
Wiem, że istnieje funkcja sumy.częściowe, ale nie można jej użyć łącznie z funkcją licz.jeżeli.
Znalazłam rozwiązanie dla tego problemu w postaci makra, ale napisanego w vba:
Function CountIfVisible(MyRange As Range, Compare as Range) As Long
Dim c As Range
For Each c In MyRange
If (c.Value = Compare.Value) And (c.EntireRow.Hidden = False) Then
CountIfVisible = CountIfVisible + 1
End If
Next c
End Function
Czy ktoś mógłby powiedzieć mi w jaki sposób napisać takie makro w basicu?
Albo czy istnieje jakieś inne rozwiązanie mojego problemu?
Pozdrawiam
Kasia