วิธีใช้ sumproduct ใน vba (พร้อมตัวอย่าง)

คุณสามารถใช้ไวยากรณ์พื้นฐานต่อไปนี้เพื่อใช้ SUMPRODUCT ใน VBA:

 SubSumProduct ()
Range(" E2 ") = WorksheetFunction.SumProduct(Range(" B2:B11 "), Range(" C2:C11 "))
End Sub

ตัวอย่างนี้จะคำนวณผลรวมของผลิตภัณฑ์ของค่าในช่วง B2:B11 และ C2:C11 และส่งคืนผลลัพธ์ในเซลล์ E2 .

ตัวอย่างต่อไปนี้แสดงวิธีใช้ไวยากรณ์นี้ในทางปฏิบัติ

ตัวอย่าง: วิธีใช้ SUMPRODUCT ใน VBA

สมมติว่าเรามีชุดข้อมูลต่อไปนี้ซึ่งมีข้อมูลเกี่ยวกับการขายผลไม้ต่างๆ ที่ร้านขายของชำ:

สมมติว่าเราต้องการคำนวณรายได้รวมของร้านค้าโดยการคูณราคาด้วยจำนวนหน่วยแล้วนำผลรวมมา

เราสามารถใช้วิธี VBA SumProduct เพื่อทำสิ่งนี้:

 SubSumProduct ()
Range(" E2 ") = WorksheetFunction.SumProduct(Range(" B2:B11 "), Range(" C2:C11 "))
End Sub

เมื่อเราเรียกใช้แมโครนี้ เราได้รับผลลัพธ์ต่อไปนี้:

ผลรวมของผลิตภัณฑ์ของค่าระหว่างช่วง B2:B11 และ C2:C11 คือ 139

ค่านี้จะแสดงในเซลล์ E2 ตามที่เราระบุไว้ในมาโคร

เราสามารถตรวจสอบได้ว่าข้อมูลนี้ถูกต้องโดยการคำนวณผลรวมของผลิตภัณฑ์ระหว่างสองช่วงด้วยตนเอง:

ผลรวมของผลิตภัณฑ์: (4*1) + (3*5) + (3*4) + (2*7) + (2*3) + (5*5) + (3*5) + (2*6) ) + (5*6) + (2*3) = 139 .

ซึ่งสอดคล้องกับค่าที่คำนวณโดยวิธี VBA SumProduct

หมายเหตุ : คุณสามารถดูเอกสารฉบับเต็มสำหรับวิธี VBA SumProduct ได้ที่นี่

แหล่งข้อมูลเพิ่มเติม

บทช่วยสอนต่อไปนี้จะอธิบายวิธีการทำงานทั่วไปอื่นๆ ใน VBA:

VBA: วิธีเพิ่มค่าในช่วง
VBA: วิธีคำนวณค่าเฉลี่ยของช่วง
VBA: วิธีนับจำนวนแถวในช่วง