Summenprodukt
30.04.2003 13:32:38
Geoff
Function xxx()
Dim a, b, d As Variant
x = Range("a1")
y = Range("b1")
a = Range("a4:a14")
b = Range("b4:b14")
d = Range("d4:d14")
xxx = Application.SumProduct((a = x) * (b = y) * d)
End Function
Warum funktioniert dieses Code nicht bzw. was mache ich hier falsch ?
Vielen Dank im Voraus !!!