Aprenda las funciones de caso de VBA para que pueda aprovechar o aplicar minúsculas el texto en vez de exigir a los usuarios de su programa para hacerlo manualmente de forma automática. Aprende el " Select Case " declaración para reducir el desorden en el código. El conocimiento que usted gana de aprender estas declaraciones que usted puede ayudar a escribir las declaraciones de casos personalizados, como los que ignoran palabras como " el " y "a" para producir correctamente las mayúsculas para títulos en un documento. UCase

La función VBA UCase convierte el texto de su único argumento para todo en mayúsculas . Por ejemplo , ejecutar la instrucción " Debug.Print UCase (" hola ") dará como resultado " hola. " Usted no necesita un programa para probar esto, pero se puede ejecutar el ejemplo que acabamos de dar de la VBA " ventana Inmediato " . abra el entorno de programación VBA , haga clic en el botón "Visual Basic " en la ficha Programador , haga clic en la opción " inmediata " en el menú de la ventana de VBA. Tipo de la declaración de "debug " se acaba de describir para ver aparecer el texto " HOLA " .
función LCase
LCase

de VBA convierte el texto de entrada a todo en minúsculas , que es útil si usted necesita para comparar cadenas de texto con diferentes casos. Por ejemplo , si el programa tiene una variable " x " cuyo valor es " hola " y un valor "y" cuyo valor es " HOLA ", entonces la comparación " x = y " volvería "False" porque los casos no coinciden. la comparación " LCase (x ) = LCase ( y) " daría " Es cierto ", sin embargo, debido a que la instrucción cambia el caso de todas las cartas para bajar .
Select Case

Seleccione la función de la caja sustituye a varios si entonces las declaraciones . la instrucción Select Case pruebas de una variable, mientras que los estados de casos individuales proporcionan canales para la ejecución del programa en base a los resultados de la prueba . puede tener tantas declaraciones de casos según sea necesario. Si desea asegurarse de que el Seleccione instrucción Case atrapa todas las condiciones posibles , incluya una instrucción Case Else antes del End Select . un ejemplo ilustra cómo funciona Select Case .

Public Sub caso de prueba ()

Dim edad
< p> edad = InputBox ("Escriba su edad . " )

Select Case edad

caso 13 a 19 :

MsgBox " Usted es un adolescente. "

Case 20 a 29 :

MsgBox "Usted está en sus veinte años "

caso es > = 30 :

MsgBox " Usted es más 30 ".

End Select language VBA

End Sub
de Word Case propiedad

de Microsoft Word tiene una función similar a la propiedad llamado "caso" para la aplicación del título , oraciones y otros casos en texto. para ver esta propiedad en la acción, escriba algún texto en minúsculas en un nuevo documento y seleccione el texto , haga doble clic en él. Haga clic en la pestaña " desarrolladores" de Word, a continuación, haga clic en el botón de "Visual Basic " para entrar en el entorno de programación VBA. Pega el siguiente programa en la ventana central del medio ambiente. Este programa utiliza la propiedad el caso de Word para convertir el texto seleccionado primero en caso de condena , a continuación, a mayúsculas . Ejecute el programa presionando "F5 ". El texto seleccionado cambiará caso, cada vez que pulse " Enter".

Sub c ()

MsgBox ( "Aquí está la modalidad oración ... " )

Selection.Range.Case = wdTitleSentence

MsgBox ( " Pulse " Enter " para ver el caso del título ")

Selection.Range.Case = wdTitleWord

End Sub