photosdematures.com

Funció Excel VBA UCase

Ucase a VBA és una funció incorporada que s’utilitza per convertir una cadena d’entrada que se li proporciona en majúscules, pren un únic argument que és la cadena com a entrada i la sortida que genera aquesta funció és una cadena, l’únic que cal tenir en compte que aquesta funció converteix totes les funcions en majúscules, no només el primer caràcter.

Hi ha situacions en què hem de convertir alguns dels valors del text a MAJÚSCULES a Excel. Això es pot fer mitjançant una funció SUPERIOR a la funció de full de càlcul normal i la funció UCase al codi VBA.

Si ja esteu cercant la funció SUPERIOR a VBA, no la trobareu ni amb la classe de funció de full de càlcul. A VBA és una funció de nom completament diferent i curta, és a dir, "UCASE". Aquí "U" significa "MAJOR", de manera que la fórmula diu "MAJÚSCULA".

Sintaxi

Ara mireu la sintaxi de la funció UCASE.

Cadena: No és res més que quin és el valor de text que intentem convertir a majúscules. També podria ser un valor directe o una referència de cel·la. Veurem ambdós tipus d’exemples en poc temps.

Com es converteix text a majúscules mitjançant VBA Ucase?

Podeu descarregar aquesta plantilla VBA UCase Excel aquí: plantilla VBA UCase Excel

Exemple 1

Intentem convertir el valor del text excel vba a majúscula de text mitjançant la funció UCase.

Pas 1: Inicieu el subprocés creant la macro.

Codi:

 Sub UCase_Example1 () Final Sub 

Pas 2: Declareu la variable com a cadena VBA.

Codi:

 Sub UCase_Example1 () Dim k As String End Sub 

Pas 3: Assigneu el valor a la variable "k" aplicant la funció "UCASE".

Pas 4: Aquí, la cadena és el valor de text que volem convertir a majúscules i el valor de la cadena és "excel vba".

Codi:

 Sub UCase_Example1 () Dim k As String K = UCase ("excel vba") Final Sub 

Pas 5: Visualitzem el resultat de la variable al quadre de missatges.

Codi:

 Sub UCase_Example1 () Dim k As String k = UCase ("excel vba") MsgBox k End Sub 

D’acord, ja hem acabat amb la part de codificació VBA. Executem la macro per veure el resultat en un quadre de missatges.

La funció Majúscula va convertir el valor del text "excel vba" en "EXCEL VBA" en una fracció de segons.

Exemple 2

Vegem l’exemple d’utilitzar una referència de cel·la a la funció. El mateix valor de text que he introduït a la cel·la A1.

Pas 1: Mostrarem el resultat a la cel·la de rang B1, de manera que el codi serà Interval ("B"). Valor =

Codi:

 Sub UCase_Example2 () Range ("B1"). Valor = Final Sub 

Pas 2: A la cel·la B1 mitjançant la funció UCASE emmagatzemarem les dades, així que obriu la funció UCASE.

Pas 3: Aquí, el valor de la cadena és la referència de cel·la aquesta vegada. Per tant, doneu la referència de la cel·la com Interval ("A1"). Valor.

Codi:

 Sub UCase_Example2 () Range ("B1"). Valor = UCase (Range ("A1"). Value) End Sub 

Així doncs, fet.

Executeu el codi i vegeu el resultat a la cel·la B1.

Exemple 3

A l'exemple anterior, hem vist l'únic valor d'una sola cel·la que s'ha de convertir en majúscules. Imagineu-vos si teniu diversos noms com la imatge següent.

En aquests casos, no podem continuar escrivint el codi per a cada línia, de manera que hem d’incloure la fórmula amb bucles. El codi inferior convertirà els valors del text anteriors a majúscules alhora.

Codi:

 Sub UCase_Example3 () Dim k Llarg per a k = 2 a 8 cel·les (k, 2). Valor = UCase (cel·les (k, 1). Valor) Següent Fin final Sub 

Això convertirà tots els valors del text en majúscules de la fila 2 a la fila 8 de la següent manera.

Imagineu-vos si voleu convertir tots els valors de cel·la seleccionats en majúscules i, a continuació, utilitzeu el codi següent.

Codi:

 Sub UCase_Example4 () Dim Rng As Range Set Rng = Selecció per a cada Rng de la selecció Rng = UCase (Rng.Value) Següent Rng Final Sub 

Perquè aquest codi funcioni, primer hem de seleccionar l'interval de cel·les que volem convertir a majúscules i, a continuació, executar la macro. Només a l'interval seleccionat convertirà els valors del text a majúscules.