[Nhờ giúp đỡ] Viết lập trình công thức trong excell (2 người xem)

[maitheota]

Em đang muốn lập trình tính 2 công thức sau:

Em viết code như sau:
Sub congthuc()
Dim a, b, c, i, j, m, n As Integer
b = ActiveCell.Offset(0, -2).Value
n = ActiveCell.Offset(0, -1).Value
a = n * b
c = 0
For i = 2 To a
m = 1
For j = 2 To i
m = m * (a - j + 1) / (n - j)
Next j
c = c + i * m * a * (1 - b) / n
Next i
ActiveCell.Value = c
End Sub


Với giả định số liệu nhập vào: beta nằm cách cột đang hoạt động về phía bên trái 2 cột. Ncs0 nằm cách cột đang hoạt động về phía bên trái 1 cột.
Nhưng chạy ra kết quả nó k chính xác, mong anh chị giúp em với Thanks anh chị nhiều lắm!