Función Excel VBA UCase
Ucase en VBA es una función incorporada que se utiliza para convertir una cadena de entrada que se le proporciona en mayúsculas, toma un único argumento que es la cadena como entrada y la salida generada por esta función es una cadena, lo único que se debe mantener Tenga en cuenta que esta función convierte toda la función a mayúsculas, no solo el primer carácter.
Hay situaciones en las que necesitamos convertir algunos de los valores de texto a MAYÚSCULAS en Excel. Esto se puede hacer usando una función SUPERIOR en la función de hoja de trabajo normal y la función UCase en el código VBA.
Si ya está buscando la función SUPERIOR en VBA, entonces no la encontrará, ni siquiera con la clase de función de la hoja de trabajo. En VBA, es una función de nombre corto completamente diferente, es decir, "UCASE". Aquí, "U" significa "SUPERIOR", por lo que la fórmula dice "MAYÚSCULAS".
Sintaxis
Ahora, observe la sintaxis de la función UCASE.
Cadena: no es más que el valor de texto que estamos tratando de convertir a mayúsculas. Esto también podría ser un valor directo o una referencia de celda. Veremos ambos tipos de ejemplos en breve.
¿Cómo convertir texto a mayúsculas usando VBA Ucase?
Ejemplo 1
Intentemos convertir el valor de texto excel VBA a texto en mayúsculas usando la función UCase.
Paso 1: Inicie el subprocedimiento creando la macro.
Código:
Sub UCase_Example1 () End Sub
Paso 2: declare la variable como cadena VBA.
Código:
Sub UCase_Example1 () Dim k As String End Sub
Paso 3: Asignar el valor a la variable “k” aplicando la función “UCASE”.
Paso 4: Aquí, una cadena es nuestro valor de texto de destino que estamos tratando de convertir a mayúsculas, y el valor de la cadena es "excel VBA".
Código:
Sub UCase_Example1 () Dim k As String K = UCase ("excel vba") End Sub
Paso 5: Vamos a mostrar el resultado de la variable en el cuadro de mensaje.
Código:
Sub UCase_Example1 () Dim k As String k = UCase ("excel vba") MsgBox k End Sub
Ok, hemos terminado con la parte de codificación de VBA. Ejecutemos la macro para ver el resultado en un cuadro de mensaje.
Entonces, la función de mayúsculas convirtió el valor de texto "excel VBA" a "EXCEL VBA" en una fracción de segundos.
Ejemplo # 2
Veamos el ejemplo del uso de una referencia de celda a la función. El mismo valor de texto que ingresé en la celda A1.
Paso 1: Mostraremos el resultado en la celda Rango B1, por lo que el código será Rango ("B"). Valor =
Código:
Sub UCase_Example2 () Rango ("B1"). Valor = End Sub
Paso 2: En la celda B1 a través de la función UCASE, almacenaremos los datos, así que abre la función UCASE.
Paso 3: Aquí, el valor de la cadena es la referencia de celda esta vez. Así que dé la referencia de celda como Rango (“A1”). Valor.
Código:
Sub UCase_Example2 () Rango ("B1"). Valor = UCase (Rango ("A1"). Valor) End Sub
Hecho.
Ejecute el código y vea el resultado en la celda B1.
Ejemplo # 3
En el ejemplo anterior, hemos visto el único valor de celda única que se convierte a mayúsculas. Imagínese si tiene varios nombres como la imagen de abajo.
En estos casos, no podemos seguir escribiendo el código para cada línea, por lo que debemos encerrar la fórmula con bucles. El siguiente código convertirá los valores de texto anteriores a mayúsculas de una vez.
Código:
Sub UCase_Example3 () Dim k As Long For k = 2 To 8 Cells (k, 2) .Value = UCase (Cells (k, 1) .Value) Next k End Sub
Esto convertirá todos los valores de texto a mayúsculas de la fila 2 a la fila 8 de la siguiente manera.
Imagínese si desea convertir todos los valores de celda seleccionados a mayúsculas y luego use el siguiente código.
Código:
Sub UCase_Example4 () Dim Rng As Range Set Rng = Selección para cada Rng In Selection Rng = UCase (Rng.Value) Next Rng End Sub
Para que este código funcione, primero debemos seleccionar el rango de celdas que deseamos convertir a mayúsculas y luego ejecutar la macro. Solo en el rango seleccionado, convertirá los valores de texto a caracteres en mayúsculas.
