Cambiar la primer letra a mayúcula

Me podrían ayudar con una macro que cambie la primer letra a mayúsculas de un texto, tengo que cambiar la primer letra a mayúsculas de toda la columna A y son bastantes celdas. Agradezco enormemente su ayuda.

1 respuesta

Respuesta
2

Te anexo la macro para cambiar la letra en la columna A

Sub PrimeraLetraMayuscula()
'Por.Dante Amor
    For i = 1 To Range("A" & Rows.Count).End(xlUp).Row
        Cells(i, "A") = UCase(Left(Cells(i, "A"), 1)) & Mid(Cells(i, "A"), 2)
    Next
End Sub

Saludos.Dante Amor. Recuerda valorar la respuesta.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas