Cách sử dụng hàm sumproduct trong VBA

[Tu Anh]

Mình đang cần sử dụng hàm sumproduct để tính toán trong VBA nhưng không biết cú pháp của hàm này viết như thế nào trong VBA. Mình đã sử dụng record macro nhưng nó chỉ ra dòng như thế này:
Range("F25").Select
ActiveCell.FormulaR1C1 = _
"=SUMPRODUCT((R6C1:R15C1<=R15C1)*(R6C1:R15C1>=R6C1)*(R6C2:R15C2=R7C2)*(R6C3:R15C3))"
Range("F25").Select

Tức là nó chỉ điền chuỗi ký tự "=SUMPRODUCT((R6C1:R15C1<=R15C1)*(R6C1:R15C1>=R6C1)*(R6C2:R15C2=R7C2)*(R6C3:R15C3))" vào ô F25. Như vậy không tùy biến được các giá trị mình đánh dấu.
Bây giờ mình muốn từ vòng lặp for tìm ra giá trị i thỏa mãn điều kiện sau đó đưa giá trị i vào công thức để thành
SUMPRODUCT((R6C1:R15C1<=R15C1)*(R6C1:R15C1>=R6C1)*(R6C2:R15C2=R7C2)*(R6Ci:R15Ci))
Các bạn xem có cách nào giả quyết được không.
Cám ơn nhiều.

 

[Mr Okebab]

Bạn tham khảo, bài số 7 của NVSON
http://www.giaiphapexcel.com/forum/showthread.php?t=816

Thân!

 

[hoa tam that]

Có cách nào viết VBA cho hàm để thực hiện đơn giản của hàm nào đấy không? Vừa nhanh vừa chuẩn và nhất là không sợ nhầm lẫn

 

[tedaynui]

Có cách nào viết VBA cho hàm để thực hiện đơn giản của hàm nào đấy không? Vừa nhanh vừa chuẩn và nhất là không sợ nhầm lẫn

Chào bạn
Bạn nêu cụ thể hàm nào hoặc gởi file có trường hợp cụ thể, chứ nói chung chung thế nào cũng khó trả lời lắm. Vì yêu cầu của bạn thấy đơn giản nhưng cụ thể mình nghĩ cũng không đơn giản thế đâu.

Mến !