Mientras trabaja en VBA, a menudo necesita convertir cadenas en minúsculas, mayúsculas o mayúsculas adecuadas. Esto es posible mediante el uso de las funciones UCase, LCase y StrConv.
Estas funciones son importantes al manipular cadenas en VBA, ya que VBA distingue entre mayúsculas y minúsculas. Si desea que VBA sea insensible a mayúsculas y minúsculas, debe agregar Texto de comparación de opciones en la parte superior de su módulo. Puede obtener más información sobre esto aquí: Evitar que VBA distinga entre mayúsculas y minúsculas
UCase: Convierta la cadena en Mayúsculas
La función UCase en VBA convierte todas las letras de una cadena en mayúsculas. Solo hay un argumento, que puede ser una cadena, una variable con cadena o un valor de celda. Esta función se usa a menudo si desea comparar dos cadenas. Aquí está el código para la función UCase:
|
1
2
3
4
5
6
7
8
|
Dim strText Como String
Dim strTextUCase Como String
strText = «ejecución de Mayúsculas función»
strTextUCase = UCase(strText)
MsgBox strTextUCase
|
En el ejemplo, queremos convertir todas las cartas de la strText variable a mayúsculas y asignar la cadena convertida a la strTextUCase variable. Al final llamamos al cuadro de mensaje con la cadena convertida:
Imagen 1. Usando la función UCase en VBA
LCase-Convertir Cadena a Minúsculas
Si desea convertir todas las letras de una cadena en minúsculas, debe usar la función LCase. Esta función tiene un argumento, el mismo que el UCase. Este es el código para la función LCase:
|
1
2
3
4
5
6
7
8
|
Dim strText Como String
Dim strTextLCase Como String
strText = «EJECUCIÓN de minúsculas FUNCIÓN»
strTextLCase = LCase(strText)
MsgBox strTextLCase
|
En este ejemplo, podemos convertir todas las cartas de la cadena de A1 en minúsculas. Después de eso, la cadena convertida se asigna a la celda A1.
Imagen 2. Uso de la función LCase en VBA
StrConv-Convertir Cadena a Mayúsculas y minúsculas adecuadas
La función StrConv le permite convertir una cadena de texto en mayúsculas y minúsculas adecuadas. La función tiene dos argumentos. La primera es la cadena que desea convertir. El segundo es el tipo de conversión que desea. Para convertir una cadena a un caso adecuado, debe configurarla en vbProperCase. El código para la función es:
|
1
2
3
4
5
6
7
8
|
Dim strText As String
Dim strTextProperCase As String
strText = «running proper case function»
strTextProperCase = StrConv(strText, vbProperCase)
MsgBox strTextProperCase
|
You will see on the example how the function works. Toma la cadena de la celda B1, la convierte en mayúsculas y minúsculas y devuelve el valor de la celda A1.
Imagen 3. Uso de la función StrConv en VBA
StrConv-Convertir Cadena a Mayúsculas o Minúsculas
Con la función StrConv, también puede convertir una cadena a mayúsculas o minúsculas. Para hacer esto, solo necesita establecer el segundo argumento en vbUpperCase o vbLowerCase:
|
1
|
strTextConverted = StrConv(strText, vbUpperCase)
|
|
1
|
strTextConverted = StrConv(strText, vbLowerCase)
|
VBA Superior, Inferior, y el Caso de Caso de Funciones en Access
Todos los ejemplos anteriores funcionan exactamente de la misma en Access VBA como en VBA de Excel.
|
1
2
3
4
|
Private Sub ClientName_AfterUpdate()
‘este va a convertir el texto en el nombre del cliente del cuadro de a mayúsculas
Me.ClientName = UCase (Me.Nombre del cliente)
End Sub
|
