Cómo convertir letras pequeñas en letras mayúsculas para pocas columnas usando VBA en Microsoft Excel En este artículo aprenderemos cómo convertir texto en letras mayúsculas en columnas específicas (no todas las celdas) usando código VBA.

Pregunta): Quiero un código que reemplace el texto ingresado en letras 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

img1

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

img2

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.

image 7