Ir al contenido principal

Formulas definidas por el usuario (UDF) - Macros en Excel

Las formulas o funciones de Excel  son el recurso principal para quienes su trabajo gira alrededor de una hoja de calculo, es por esto que cuando se habla de macros es imposible dejar de mencionarlas. Pero ¿Cuál es la diferencia entre una macro corriente y una formula?

La macro corriente se ejecuta a partir de una acción como un clic luego que es asignada a un boton, gráfico o simplemente desde el visor de macros usando la acción "Ejecutar".

Las formulas por el contrario inician con el simbolo "=" o "+" y las inserta el usuario en el momento que la requiere y la celda apropiada (Nada nuevo). La ventaja es que usando VBA puedo crear formulas propias de modo que simplemente usen los argumentos de mi interes.

Un pequeño ejemplo para aclarar:

Crear una función que convierta de grados Celsius a Farenheit. Esta formula no esta creada por defecto, en su remplazo hay otra que es convertir y que además de convertir grados tiene otras utilidades. Si lo que me interesa es unicamente de grados Celsius a Farenheit desarrollo una formula así:

=farenheit(celsius) donde celsius es el valor a convertir y farenheit es el nombre de la formula.

En el editor de VBA se veria como:

Function fahrenheit(celsius)
       Fahrenheit = celsius * 9 / 5 + 32
End Function

¿Donde estan las variables?, las variables son farenheit y celsius. En ellas se almacenan los valores de la operación y son mostrados en la celda donde se ejecute la formula.

Ejercicio reto:

Como uno de los retos de clase, se propuso desarrollar una función que permitiera tomar un rango de celdas cualquiera y sumara su contenido numerico. ¿Les suena familiar con alguna otra formula?. Si es la función suma para principiantes en el desarrollo de macros.

A continuación la solución:

Function hola(prueba As Range) As Double

Dim resultado As Double
resultado = 0     'Iniciar la variable en 0

For Each cell In prueba
    resultado = cell.Value + resultado
Next
hola = resultado

End Function


Comentarios

Entradas más populares de este blog

Ejercicio Condicionales usando Macros en Excel

La toma de decisiones es determinante en la secuencia de ejecución de una macro. Las herramientas que proporciona VBA para la toma de decisiones descansan en los condicionales. Un ejemplo de estructuras condicionales en Excel es la función "SI", la cual permite hacer una prueba lógica y tomar generar dos resultados posibles dependiendo si la prueba lógica es verdadera o falsa. "SI su estatura en metros es superior a 1.5 mts, puede ingresar a la montaña rusa, de lo contrario NO". En la afirmación anterior solo aquellos niños con una estatura superior a 1.5 tendrán acceso al juego mecánico, los demás niños simplemente estarán excluidos del juego hasta que cumplan el requisito de forma imperativa.
El lenguaje de macros permite 3 estructuras condicionales distintas:
a) IIF(prueba_lógica, verdadero, falso). Su resultado obligatoriamente debe asignarse a una variable
variable = IFF(3>1, "Verdadero", "Falso"). El tipo de variable puede ser numero, …

Variables y Tipos de datos - Macros en Excel

Las variables son útilies en la creación de Macros. Son de nuestro especial interés cuando deseamos desarrollar formulas personalizadas (User Defined Formulas). Para introducirnos en el tema de la creación de formulas, necesitamos reconocer los tipos de datos existentes y tener la capacidad de utilizarlos. A continuación se presenta una tabla con los tipos de datos y la capacidad de almacenamiento según el tipo.


Cada de uno de estos tipos de datos deben usarse en concordancia con el objetivo de la macro. El siguiente ejercicio muestra el uso de variables tipo entero (integer):

Entrar una cantidad que representa el precio de algo por el teclado con la instrucción InputBox y
guardarlo en la celda A1 de la hoja activa. Si el valor entrado desde el teclado (y guardado en A1) es superior a 1000, pedir descuento con otro InputBox y guardarlo en la casilla A2 de la hoja activa.
Calcular en A3, el precio de A1 menos el descuento de A2.

Sub variables1()
Dim Precio As Integer     'Variables ti…