Saltar al contenido

Determinar mes del año


cesarion_2009

Recommended Posts

  • 2 weeks later...
publicado

Hola @cesarion_2009

Espero tambien este te pueda ser util:

Dibujando un botón de comando en la hoja1 y colocar el siguiente procedimiento:

Dim Lin As Long

With Hoja1


Lin = 2

    Do While .Cells(Lin, 1) <> ""
    
        .Cells(Lin, 2) = UCase(MonthName(Month(.Cells(Lin, 1))))
    
    Lin = Lin + 1
    Loop

End With

Adjunto archivo para mayor comprensión.

Mis respetos.

Determinar fecha.xlsm

publicado

Aquí tienes una UDF:

Function QUEMES(Fecha As Range) As String

   QUEMES = UCase(MonthName(Month(Fecha)))

End Function

 

  • 3 weeks later...

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.