VBA para convertir texto de minúsculas a mayúsculas

Sabemos cómo convertir texto en minúsculas a mayúsculas en la hoja de trabajo, pero ¿cómo convertimos minúsculas a mayúsculas usando VBA? Al automatizar el proceso, es posible que tenga la necesidad de convertir el texto de la hoja a mayúsculas.

En la hoja de trabajo, usamos la función SUPERIOR para cambiar entre minúsculas y mayúsculas. En VBA, tenemos una función similar. El nombre es la función es UCase. UCase son las siglas de UpperCase.

Sintaxis de la función UCase:

= UCase (Cuerda)

Aquícuerdapuede ser una cadena de código rígido o una referencia a la cadena.

Entonces, ahora que conocemos la función que se puede usar para cambiar letras minúsculas a cadenas mayúsculas, usémosla en un ejemplo práctico.

Convertir todo el texto de una hoja a mayúsculas

Aquí tenemos una tarea simple para convertir todo el texto de una hoja determinada en un libro de trabajo a mayúsculas. L

Para obtener el código para convertir texto en letras mayú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 de la hoja de trabajo (no es un módulo normal).


Sub UpperCaseCode1 ()
Application.ScreenUpdating = Falso
Dim Rng como rango
Dim c como rango
En caso de error, reanudar siguiente
Establecer Rng = Cells.SpecialCells (xlCellTypeConstants, 2)
Para cada c en Rng
c.Value = UCase (c.Value)
Siguiente c
Application.ScreenUpdating = True
End Sub

¿Como funciona?

El código anterior está escrito en el módulo sheet1. El código anterior convertirá todo el texto en sheet1 a mayúsculas.

Las líneas principales del código anterior son:

Establecer Rng = Cells.SpecialCells (xlCellTypeConstants, 2)
Para cada c en Rng
c.Value = UCase (c.Value)
Siguiente c

Aquí usamos la función SpecialCells de la clase Cells y pasamos los argumentos xlCellTypeConstants. Devuelve una enumeración de celdas y rangos que contienen constantes.

A continuación, usamos el bucle for para iterar sobre cada celda en la enumeración. A continuación, cambiamos ese valor de celda usando la función UCase.

Aquí la declaraciónc.Value = UCase (c.Value) actualiza los valores de cada celda con texto en mayúsculas.

Ejemplo 2: convertir el texto de la columna A en mayúsculas.

En este ejemplo, tenemos la tarea de convertir solo la columna de texto A. Es posible que desee hacer esto cuando columnas específicas contienen texto especial que debe estar solo en mayúsculas.

Sub UpperCaseCode2 ()
Application.ScreenUpdating = Falso
Atenuar celda como rango
Para cada celda del rango ("$ A $ 1:" & Rango ("$ A $ 1"). SpecialCells (xlLastCell) .Address)
Si Len (celda)> 0 Entonces celda = UCase (celda)
Siguiente celda
Application.ScreenUpdating = True
End Sub

El código es casi el mismo que en el ejemplo anterior. El único cambio que tenemos son estas líneas:

Para cada celda del rango ("$ A $ 1:" & Rango ("$ A $ 1"). SpecialCells (xlLastCell) .Address)
Si Len (celda)> 0 Entonces celda = UCase (celda)
Siguiente celda

Aquí creamos un rango dinámico usando la línea Rango ("$ A $ 1:" & Rango ("$ A $ 1"). SpecialCells (xlLastCell) .Address). Esta línea crea un rango desde la celda A1 hasta la última celda que contiene cualquier valor en la columna A.

Luego, iteramos a través de cada celda y la actualizamos con cadenas en mayúsculas de sí mismo.

Puede descargar el archivo a continuación.

Descargar - VBA para convertir texto de minúsculas a mayúsculas - xlsm

Así que sí, chicos, así es como pueden actualizar el texto en minúsculas a mayúsculas. Espero haber sido lo suficientemente explicativo. Si tiene alguna duda con respecto a este artículo o cualquier otra consulta relacionada con VBA. Pregúntame en la sección de comentarios a continuación.

Cómo usar la función TRIM en Excel: La función TRIM se utiliza para recortar cuerdas y limpiar los espacios iniciales o finales de la cuerda. Esto nos ayuda mucho en el proceso de limpieza de datos.

Cómo usar la función LIMPIAR en Excel: La función de limpieza se utiliza para limpiar los caracteres no imprimibles de la cadena. Esta función se utiliza principalmente con la función TRIM para limpiar datos extranjeros importados.

Reemplazar texto desde el final de una cadena comenzando desde la posición variable: Para reemplazar el texto del final de la cadena, usamos la función REPLACE. La función REPLACE usa la posición del texto en la cadena para reemplazarlo.

Cómo verificar si una cadena contiene uno de muchos textos en Excel: Para comprobar si una cadena contiene texto múltiple, usamos esta fórmula. Usamos la función SUM para resumir todas las coincidencias y luego realizamos una lógica para verificar si la cadena contiene alguna de las múltiples cadenas.

Contar celdas que contienen texto específico: Una simple función CONTAR.SI hará la magia. Para contar el número de celdas múltiples que contienen una cadena dada, usamos el operador comodín con la función CONTAR.SI.

Excel REEMPLAZAR vs SUSTITUIR función: Las funciones REEMPLAZAR y SUSTITUIR son las funciones más incomprendidas. Para buscar y reemplazar un texto dado usamos la función SUSTITUIR. Donde REPLACE se usa para reemplazar una cantidad de caracteres en una cadena …

Articulos populares:

50 accesos directos de Excel para aumentar su productividad | Acelera tu tarea. Estos 50 accesos directos le permitirán trabajar aún más rápido en Excel.

Cómo utilizar la función BUSCARV de Excel| Esta es una de las funciones más utilizadas y populares de Excel que se utiliza para buscar valores de diferentes rangos y hojas.

Cómo utilizar el Sobresalir Función COUNTIF| Cuente valores con condiciones usando esta asombrosa función. No necesita filtrar sus datos para contar valores específicos. La función Countif es esencial para preparar su tablero.

Cómo usar la función SUMIF en Excel | Esta es otra función esencial del tablero. Esto le ayuda a resumir valores en condiciones específicas.

Va a ayudar al desarrollo del sitio, compartir la página con sus amigos

wave wave wave wave wave