jueves, 5 de octubre de 2017

viernes, 12 de mayo de 2017

Función Personalizada en VB para Excel (Desviación Típica de un Portfolio)


'DESVIACION TIPICA DE UNA CARTERA
Public Function DTP(NA, PESOS, DESV, CORREL)
Dim n, x, y
n = NA
DTP = 0
For x = 1 To n
For y = 1 To n
DTP = DTP + (PESOS(x) * PESOS(y) * DESV(x) * DESV(y) * CORREL(x, y))
Next y
Next x
DTP = Sqr(DTP)
End Function

Insertar este codigo en VB de Excel y tendreis una funcion util para calcular el riesgo de una cartera con n activos.