¿Cómo usar la función MonthName en VBA?

La función `MonthName` en VBA se utiliza para obtener el nombre completo del mes correspondiente a un número determinado (entre 1 y 12). Aquí te muestro cómo utilizar esta función:

Sintaxis

MonthName(month, [abbreviate])

month: Un número que representa el mes (entre 1 y 12).
abbreviate (opcional): Un valor booleano. Si se establece en `True`, se devuelve una abreviatura de tres letras del nombre del mes. Si se omite o se establece en `False`, se devuelve el nombre completo del mes.

Ejemplo de uso

Aquí tienes un ejemplo de cómo usar `MonthName` en un procedimiento VBA:

Sub MostrarNombreMes()
    Dim mesNumero As Integer
    Dim nombreMes As String

    mesNumero = 5 ' Por ejemplo, mayo
    nombreMes = MonthName(mesNumero)
    
    MsgBox "El mes " & mesNumero & " es " & nombreMes
End Sub

Ejemplo con abreviatura

Si deseas obtener la abreviatura del mes, puedes hacerlo de la siguiente manera:

Sub MostrarAbreviaturaMes()
    Dim mesNumero As Integer
    Dim nombreMes As String

    mesNumero = 10 ' Por ejemplo, octubre
    nombreMes = MonthName(mesNumero, True)
    
    MsgBox "La abreviatura del mes " & mesNumero & " es " & nombreMes
End Sub

Notas

Asegúrate de que el `month` que pasas a la función sea un número válido entre 1 y 12; de lo contrario, la función puede generar un error.
El idioma de salida del nombre del mes dependerá de la configuración regional del sistema donde se esté ejecutando el código VBA.

facebooklinkedin