Problem mit Funktion bei Formelzellen
01.01.2023 22:16:13
Burghard
allen ein gutes neues Jahr! Hier mein Problem: Ich benutze eine Funktion, bekomme aber in der Zelle F9 als Ergebnis #Wert, vermutlich weil in den Zellen F10 bis F350 jeweils eine Formel steht. Die Versuche mit "IstFehler" und "WennFehler" habe keine Änderung gebracht. Gibt es eine Möglichkeit, das Problem zu lösen oder kann der Aufruf einer Funktion, die sich über Formelzellen erstreckt, prinzipiell keine Summe bilden? Hier meine Infos:
Zelle F9 beruht auf einer Funktion, Aufruf mit:
=ohne_strich($F$10:$F$350)
Die Funktion lautet:
Public Function ohne_strich(Bereich As Range)
Dim rngC As Range, dblZ As Double
Application.Volatile
For Each rngC In Bereich
If rngC.Font.Strikethrough = False And rngC > 0 Then
dblZ = dblZ + rngC
End If
Next
ohne_strich = dblZ
ActiveSheet.Calculate
End Function
Hilfe wäre nett.
Viele Grüße
Burghard