Hoe sumproduct in vba te gebruiken (met voorbeeld)
U kunt de volgende basissyntaxis gebruiken om SUMPRODUCT in VBA te gebruiken:
SubSumProduct ()
Range(" E2 ") = WorksheetFunction.SumProduct(Range(" B2:B11 "), Range(" C2:C11 "))
End Sub
Dit specifieke voorbeeld berekent de som van het product van de waarden in de bereiken B2:B11 en C2:C11 en retourneert het resultaat in cel E2 .
Het volgende voorbeeld laat zien hoe u deze syntaxis in de praktijk kunt gebruiken.
Voorbeeld: SUMPRODUCT gebruiken in VBA
Stel dat we de volgende dataset hebben met informatie over de verkoop van verschillende soorten fruit in een supermarkt:
Stel dat we de totale omzet van de winkel willen berekenen door de prijs te vermenigvuldigen met het aantal eenheden en vervolgens de som te nemen.
We kunnen hiervoor de VBA SumProduct -methode gebruiken:
SubSumProduct ()
Range(" E2 ") = WorksheetFunction.SumProduct(Range(" B2:B11 "), Range(" C2:C11 "))
End Sub
Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:
De som van het product van de waarden tussen de bereiken B2:B11 en C2:C11 is 139 .
Deze waarde wordt weergegeven in cel E2 , zoals we in de macro hebben opgegeven.
We kunnen verifiëren dat dit juist is door handmatig de som van de producten tussen de twee bereiken te berekenen:
Som van producten: (4*1) + (3*5) + (3*4) + (2*7) + (2*3) + (5*5) + (3*5) + (2*6 ) + (5*6) + (2*3) = 139 .
Dit komt overeen met de waarde berekend door de VBA SumProduct- methode.
Opmerking : u kunt hier de volledige documentatie voor de VBA SumProduct- methode vinden.
Aanvullende bronnen
In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in VBA kunt uitvoeren:
VBA: waarden toevoegen in een bereik
VBA: Hoe de gemiddelde waarde van het bereik te berekenen
VBA: het aantal rijen binnen bereik tellen