Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado

Calculo de función FORGEN (fórmula general)

| 5 comentarios

En esta oportunidad, presentaremos una función que puede encontrar las raíces de una Ecuación de Segundo Grado, denominada FORGEN, cuyo nombre proviene de la denominada Fórmula General. Para explicar este caso presentamos una ecuación de la forma: ax^2+bx+c, donde "a", "b" y "c" son números y "x" es nuestra variable algebraica. Al ver que este caso es una ecuación grado 2, se infiere que se cuenta con dos raíces sean denominadas x1 y x2.

Nuestra funcion tendrá la forma:

FORGEN( valor_a, valor_b; valor_c)

cuadro 1 300x85 Calculo de función FORGEN (fórmula general)

(Para mayor visualización de la imagen, hacer click en la misma)

En la gráfica presentada se observan ejemplos de ecuaciones de segundo grado donde se desea conocer el valor de las raíces de estas ecuaciones y existen diversas formas de calcular estas raíces, entre ellas, haciendo el método aspa simple, sumando y restando valores para obtener polinomios conocidos, etc. No obstante, existe una forma mucho más rápida de calcular estas raíces y es empleando la Formula General. Esta formula es un método matemático (a veces un poco engorroso) que tiene operaciones que calcular y puede tornarse un tanto complicada dependiendo de los valores que acompañen a la variable algebraica.

El programa excel, sin embargo, al ser una poderosa hoja de cálculo, permite hacer estos cálculos de manera más rápida, y la operación es mucho más rápida si se utiliza la función FORGEN desarrollada es esta pequeña presentación.

Cabe recalcar que, como se mencionó anteriormente, al ser de grado 2 las ecuaciones significan que poseen dos variables; en tal sentido, determinaremos dos casos de la función FORGEN (Fórmula General) para hallar estas raíces. El nombre de la función en formato VBA es el siguiente

Function FORGEN1(a, b, c)
FORGEN1 = ((-b + ((b ^ 2) - 4 * a * c) ^ 1 / 2)) / (2 * a)
End Function

Function FORGEN2 (a, b, c)
FORGEN2 = ((-b - ((b ^ 2) - 4 * a * c) ^ 1 / 2)) / (2 * a)
End Function

Una vez introducidas las funciones, procedemos a hallar las raíces correspondientes utilizando ambas funciones planteadas.

A continuación, se adjunta el siguiente archivo Excel que contiene un ejemplo del uso de la funcion FORGEN (Fórmula General), y se invita a probar la funcion con los otros casos propuestos u otro alguno en particular

Función Fórmula General

 Elaborado por: Hugo Fuentes Dávila

5 comentarios

  1. Podria extenderse para calcular tambien las raices complejas, para hacer lo mas general

  2. bueno aqui la mejora propuesta:

    Function FORGEN1(a, b, c)
    If b ^ 2 - 4 * a * c > 0 Then
    FORGEN1 = ((-b + ((b ^ 2) - 4 * a * c) ^ 1 / 2)) / (2 * a)
    Else
    FORGEN1 = "(" + Format(-b / (a * 2), "##0.00") + ", -" + Format(-(b ^ 2 - 4 * a * c) / (2 * a), "##0.00") + "i)"
    End If
    End Function

    Function FORGEN2(a, b, c)
    If b ^ 2 - 4 * a * c > 0 Then
    FORGEN2 = ((-b - ((b ^ 2) - 4 * a * c) ^ 1 / 2)) / (2 * a)
    Else
    FORGEN2 = "(" + Format(-b / (a * 2), "##0.00") + ", +" + Format(-(b ^ 2 - 4 * a * c) / (2 * a), "##0.00") + "i)"
    End If
    End Function

  3. Este ejemplo ayuda al calculo de raices cuadráticas, puede utilizarse para crear formularios básicos.

  4. Mi excel está en Inglés, como se llama la Función en Inglés? FORGEN1 y FORGEN2? Ayudaa plissss

  5. Cuidado con la raíz, En mi caso fue necesario modificar la fórmala y meter el ^1/2 a ^(1/2)
    entre paréntesis:

    Function FORGEN1(a, b, c)
    FORGEN1 = ((-b + ((b ^ 2) - 4 * a * c) ^ (1 / 2))) / (2 * a)
    End Function

    Function FORGEN2(a, b, c)
    FORGEN2 = ((-b - ((b ^ 2) - 4 * a * c) ^ (1 / 2))) / (2 * a)
    End Function

Deja una respuesta

Los campos requeridos estan marcados con *.