Utilizar la Regresión lineal múltiple en VBA

Estoy tratando de incluir la regresión lineal múltiple en una macro de Excel, intente hacerlo mediante la opción grabar macro pero al ejecutar el código aparece un error ATPVBAEN.XLAM que dice que pudo ser movido o eliminado, alguien sabe como puedo hacerlo o si tiene alguna macro para calcular la regresión múltiple.

1 respuesta

Respuesta
1

Prueba esta macro, este es el resultado, la macro esta hecha para un formato como el que aparece en la imagen, puedes cambiar la referencia b2 por cualquier otra cambiando el valor en la primera línea de la macro.

Sub regresion_multiple()
Set datos = Range("b2").CurrentRegion
With datos
    f = .Rows.Count: c = .Columns.Count
    Set datos = .Rows(2).Resize(f - 1, c)
    Set y = .Columns(1)
    Set x = .Columns(2).Resize(f - 1, c - 1)
    vr = WorksheetFunction.LinEst(y, x, True, True)
    Range("h3") = vr(4, 1):    Range("h4") = vr(5, 1)
End With
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas