Vamos a crear una función personalizada utilizada para sumar dos valores. Después de crearla, la utilizaremos en una hoja.
Inserta un nuevo módulo en el Editor de VB. Escribe la siguiente función en el módulo. Se trata de una función denominada Add que calcula el total de dos celdas diferentes. La función tiene dos argumentos:
Add(Número1, Número2)
Número1 es el primer número a añadir; Número2 es el segundo número a añadir:
Function Add(Número1,Número2) As Integer
Add=Número1 + Número2
End Function
Desglosemos el código:
Nombre de la función: Add
Los argumentos se sitúan entre paréntesis después del nombre de la función. Este ejemplo tiene dos argumentos: Número1 y Número2.
As Integer define el tipo de variable del resultado como un número entero.
Add=Número1 + Número2 devuelve el resultado de la función.
Ésta es la forma en la que utilizar la función en una hoja:
- Escribir dos números en las celdas A1 y A2.
- Seleccionar la celda A3.
- Pulsar <Mayús> + <F3> para abrir el cuadro de diálogo Insertar función (o elegir Insertar > Función del menú principal).
- Seleccionar la categoría Definidas por el usuario.
- Seleccionar la función Add.
- En el primer cuadro de argumentos, seleccionar la celda A1.
- En el segundo cuadro de argumento, seleccionar la celda A2.
- Hacer clic en Aceptar.
Felicidades! Acabamos de crear nuestra primera función personalizada. Podremos compartirla fácilmente ya que los usuarios no necesitan saber cómo funciona.
Technorati Tags: 
