Cómo convertir letras pequeñas en letras mayúsculas para algunas columnas usando VBA en Microsoft Excel
En este artículo aprenderemos cómo convertir texto en letras mayúsculas en columnas específicas (no en todas las celdas) usando código VBA.
Pregunta): Quiero un código que reemplace el texto ingresado en minúsculas en mayúsculas en algunas columnas (no todas).
Digamos que no quiero que el código se ejecute en las columnas 4, 6, 9, 12 y 13, es decir, si se ingresa algún texto en estas columnas, el código no se activará.
Para obtener las letras mayúsculas a medida que escribe en minúsculas; debemos seguir los pasos a continuación para iniciar el editor de VB
- Haga clic en la pestaña Desarrollador
- Desde el grupo Código, seleccione Visual Basic
Copie el siguiente código en el módulo Hoja
Private Sub Worksheet_Change (ByVal Target As Excel.Range)
Si Target.Column = 4 o Target.Column = 6 o Target.Column = 9 _
O Target.Column = 12 O Target.Column = 13 Luego salga de Sub
En caso de error, vaya a ErrHandler
Application.EnableEvents = False
Target.Formula = UCase (Target.Formula)
ErrHandler:
Application.EnableEvents = True
End Sub
- El código funcionará en sheet1 solo cuando el código se ingrese en sheet1
- El código reemplazará automáticamente la letra minúscula escrita por error o por ignorancia inmediatamente en mayúscula en todas las columnas excepto 4, 6, 9, 12 y 13.
De esta manera, podemos convertir texto a mayúsculas en columnas específicas usando código VBA.
Descargar - Cómo convertir letras pequeñas en letras mayúsculas - xlsm
