Función ESTIMACIÓN LINEAL en excel vba

Función ESTIMACIÓN LINEAL en excel vba

Estoy tratando de encontrar la ecuación de segundo orden (Y = ax^2 + bx + c) para un conjunto de valores de datos. Cuando uso la función incorporada en Excel

=LINEST(C2533:C2537,B2533:B2537^{1,2}) 

Obtengo el siguiente resultado para los datos que he elegido

3.08414E-09 -0.00041244 7.351136804

Pero cuando intento lo mismo en el código Excel VBA, las respuestas no se correlacionan. ¿Alguien puede decirme cuál debería ser la modificación en el código?

Set RangeM = ("C2533:C2537")  -->Y axis
Set RangeF = ("B2533:B2537") --> Xaxis
Mpolynomials = Application.WorksheetFunction.LinEst(RangeM, RangeF, True, True)
  • : Mpolinomios(1) : : Variante(1 a 2) : Mpolinomios(1,1) : -2.88227749032385E-04 : Variante/Doble : Mpolinomios(1,2) : 6.10919130371322 : Variante/Doble
  • : Mpolinomios(2) : : Variante(1 a 2) : Mpolinomios(2,1) : 2.49037160577299E-06 : Variante/Doble : Mpolinomios(2,2) : 0.050203149944234 : Variante/Doble
  • : Mpolinomios(3) : : Variante(1 a 2) : Mpolinomios(3,1) : 0.999776086266518 : Variante/Doble : Mpolinomios(3,2) : 9.34516966780855E-03 : Variante/Doble
  • : Mpolinomios(4) : : Variante(1 a 2) : Mpolinomios(4,1) : 13395.0169654829 : Variante/Doble : Mpolinomios(4,2) : 3 : Variante/Doble
  • : Mpolinomios(5) : : Variante(1 a 2) : Mpolinomios(5,1) : 1.16981624866201 : Variante/Doble : Mpolinomios(5,2) : 2.61996588360387E-04 : Variante/Doble

Respuesta1

Busqué un poco y obtuve la manera de obtener los polinomios para la ecuación de segundo orden.

Mpolinomios = Aplicación.WorksheetFunction.LinEst(RangeM, Application.Power(RangeF, Array(1, 2)))

Aquí Mpolinomios es una variante

información relacionada