https://bugs.documentfoundation.org/show_bug.cgi?id=170840

--- Comment #3 from [email protected] ---
I found a very strange trick to prevent the macro from crashing, but it’s
really not satisfying

Function Som_new( Liste() ) As Double
        Dim i,d,f As Integer
        Dim s,v As Double

        If Not IsArray(Liste) Then
                Som=0
                Exit Function
        End If

        d=LBound(Liste,1)
        f=UBound(Liste,1)

        For i=d to f
                v=Liste(i,1)
                If( IsNumeric(Liste(i,1)) And v=Liste(i,1) ) Then
                        s=s+Liste(i,1)
                End If
        Next i

        Som=s
End Function

In that case, "Som_new" does not crash and the result #VALUE! is displayed
normally...

-- 
You are receiving this mail because:
You are the assignee for the bug.

Reply via email to