Ersmals ein Kompliment an dieses Forum, hat mir bereits bei vielen Fragestellungen rund um Excel und VBA weitergeholfen, bei der nachfolgenden Problemstellung bin ich leider hilflos, vielleicht kann mir ja jemand weiterhelfen :-)
Mittel einer Summenprodukt Formel
=SUMMENPRODUKT(($A5=RollFor_data!$C$12:$C$10000)*(D$4=RollFor_data!$AW$9:$MI$9) *(RollFor_data!$AW$12:$MI$10000))
möchte ich Werte summieren basieren auf zwei bestimmten Kriterien.
Dies funktioniert soweit auch gut. Das Problem liegt bei der Performance, zuuuu schlecht und langsam.
Deshalb muss eine VBA Lösung her.
Meine Lösung sieht aktuell folgendermassen aus:
Sub test_sumproduct()
Worksheets("Upload_File").Range("D5:O12").FormulaR1C1 = _
Evaluate("=SUMPRODUCT((R[-1]C=RollFor_data!R9C49:R9C347)*(RC[-3]=RollFor_data!C3)*( _
RollFor_data!C49:C347))")
End Sub
Jedoch erscheinen folgende Probleme: 1. In der Zeile erscheint die Meldung #WERT!
2. Optimal wäre es, wenn sich die Range an die Anzahl Zeilen in Spalte A desselben Blattes orientieren würde, da die Anzahl PSP-Elemente mehr oder weniger sein können.
Nachfolgen der Link zum Printscreen der beiden Arbeitsblätter:
Ich wäre Euch sehr dankbar, wenn Ihr mir weiterhelfen könntet!
Falls Unklarheiten offen sind, stehe ich Euch gerne jederzeit zur Verfügung.
Beste Grüsse