Como crear nuestras propias funciones en Excel.

En alguno de los ejemplos anteriores he expuesto algunas funciones anidadas realmente complejas. Si nos encontramos con un caso de estos, funciones complejas, situaciones difíciles de calcular con las funciones propias de Excel, podemos crear con VBasic nuestras propias funciones.
En programación una función es una subrutina que devuelve un valor. En VBasic estas subrutinas se utilizan:

• Function NombreFunción(Parametro1,parametro2,....)
• operaciones necesarias para obtener el resultado
• NombreFunción=resultado
• end function

Para utilizar estas funciones hacemos como con las funciones propias de Excel, nos situamos en lacelda correspondiente y escribimos =NombreFunción(Param1;Param2;....)

Como ejemplo:

Function XCart(Dist, Rumbo)

XCart = Dist * Sin(3.14159265358979 * Rumbo / 180)

End Function

Esta función pasa los grados sexagesimales del parámetro Rumbo a radianes y calcula la el valor de la proyección del parámetro Dist en función del seno del rumbo.

Para utilizarla dentro de una hoja de cálculo, situándonos en la celda correspondiente:

=xcart(F3;I3)