El código para pasar la celda activa a MAUSCULAS es el siguiente:
Sub Pasar_a_MAYUSCULAS()
ActiveCell = UCase(ActiveCell)
End Sub
lo contrario, pasar la celda activa a minúsculas el código que utilizamos es:
Sub Pasar_a_minusculas()
ActiveCell = LCase(ActiveCell)
End Sub
⭐ Si te gustó, por favor regístrate en nuestra Lista de correo y Suscríbete a mi canal de YouTube para que estés siempre enterado de lo nuevo que publicamos.