Summenformel auf VBA umschreiben
Martin
folgende Formel möchte ich gerne für VBA schreiben:
=SUMMENPRODUKT((Geschlecht=A2)*(Endzeit<B2))+1
So geht es mit VBA:
MsgBox [SumProduct((Geschlecht = A2) * (Endzeit MsgBox Evaluate("SumProduct((Geschlecht = A2) * (Endzeit ("Geschlecht" und "Endzeit" sind benannte Zellenbereiche.)
Jedoch möchte ich die Zellen (im Augenblick die Zellen A2 und B2) per Makro festlegen, das habe ich aber nicht hinbekommen, da ich immer Laufzeitfehler 13 "Typen unverträglich" erhalte:
Sub Test()
MsgBox WorksheetFunction.SumProduct((Range("Geschlecht") = ActiveCell.EntireRow.Range("A2") _
) * (Range("Endzeit")
Hat vielleicht jemand eine Lösung?