Nombres de los meses

A continuación veremos un programa en Excel VBA que crea una Función definida por el usuario que utiliza la función Array para devolver los nombres de los meses .

Las funciones definidas por el usuario deben ser colocadas en un módulo.

1. Abra el Editor de Visual Basic y haga clic en Insertar, Módulo.

2. Añade la siguiente línea de código:

Función MESES()

El nombre de nuestra función es MESES. La parte vacía entre los paréntesis significa que no le damos nada a Excel VBA como entrada.

3. La función Array nos permite asignar valores a una Variant array en una línea de código.

MESES = Array(«Jan», «Feb», «Mar», «Apr», «May», «Jun», «Jul», «Aug», «Sep», «Oct», «Nov», «Dec»)

4. No te olvides de terminar la función.

Fin de la función

5. Ahora puedes usar esta función, como cualquier otra función de Excel, para devolver los nombres de los meses. Selecciona doce celdas horizontales, introduce la función =MONTHNAMES() y pulsa CTRL + SHIFT + ENTER.

Resultado:

Nota: no se puede borrar un solo mes. Para borrar los meses, seleccione el intervalo A1:L1 y pulse Borrar. Esta función sólo está disponible en este libro de trabajo.

Deja un comentario