mã VBA để xây dựng một hàm (functin) để tính độ lệch chuẩn của tỷ suất sinh lợi cổ phiếu

[huynhthikieudiem]

Em làm bài tập về viết mã VBA để xây dựng một hàm (functin) để tính độ lệch chuẩn của tỷ suất sinh lợi cổ phiếu (gồm 2 cổ phiếu của 3 trạng thái). Em gửi bảng tính đính kèm. Mọi người giúp em với... Em cảm ơn.

 

[VetMini]

Baì tập mà tính nhờ ta làm giùm từ a đến z sao?
Ít nhất bạn cũng chứng tỏ mình có học bài. Diễn tả ra cách làm bằng tay và công thức.
Sau đó người ta mới giúp bạn cách chuêyrn cách làm thành code và dựng thành 1 hàm.

 

[VetMini]

Gợi ý:
Cái phần đầu tương đối căn bản. Có học thống kê là biết công thức.
Phần sau hơi chuyên một chút. Ít nhất phải học qua một môn về Thẩm Định Đầu Tư (Actuarry Science) mới biết.

 

[huynhthikieudiem]

Trong file đính kèm mình có app công thức để tính độ lệch chuẩn của 2 cái bảng. Các bạn giúp mình viết code VBA để tính ra 2 cái số mình tô màu vàng giúp. Mai mình phải nộp bài rồi. Mình cảm ơn....

 

[VetMini]

Công thức 1 thì được. Nhưng công thức 2 hơi lạ, bình phương độ lệch chuẩn (standard deviation) là phương sai (variance) rồi, bạn đem bình phương lên lần nữa?

Hàm tính độ lệch chuẩn:

Function StdRR(rg As Range) As Double
' calculates the standard deviation of a stock using probability approach
' input range should have two columns, with first column represents probabilities and second column estimated (historical) rates of return
mean = Application.Sumproduct(rg.Resize(,1), rg.Resize(,1).Offset(0,1))
a = rg.Value
v = 0.0 ' variance
For i = 1 to UBound(a)
v = v + a(i, 1) * (a(i, 2) - mean) ^ 2
Next i
StdRR = Sqr(v)
End Function

Cái hàm cho công thức 2 thì cứ dựa theo cách đó mà viết.