Código de macro de ejemplo para cambiar entre mayúsculas y minúsculas en Excel

Resumen

Aunque Microsoft Excel tiene funciones que cambian las mayúsculas y minúsculas del texto, en ocasiones es posible que desee cambiar las mayúsculas y minúsculas mediante programación.

Este artículo contiene tres macros (sub procedimientos) de Microsoft Visual Basic para Aplicaciones de ejemplo que puede usar para cambiar las letras de una cadena de texto a todas en mayúsculas, todas minúsculas o mayúsculas (la primera letra de cada palabra está en mayúsculas). Estas acciones son similares a las funciones de Excel, =MAYUSC(), =MINUSC() y =NOMPROPIO().

Más información

Microsoft proporciona ejemplos de programación con fines ilustrativos únicamente, sin ninguna garantía, ya sea expresa o implícita. Esto incluye, entre otras, las garantías implícitas de comerciabilidad e idoneidad para un fin determinado. En este artículo se da por supuesto que ya conoce el lenguaje de programación que se muestra, así como las herramientas empleadas para crear y depurar procedimientos. Los ingenieros de soporte técnico de Microsoft pueden explicarle la funcionalidad de un determinado procedimiento, pero no modificarán estos ejemplos para ofrecer mayor funcionalidad ni crearán procedimientos adaptados a sus necesidades específicas.

Sub Uppercase()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("A1:A5")
      ' Change the text in the range to uppercase letters.
      x.Value = UCase(x.value)
   Next
End Sub

Sub Lowercase()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("B1:B5")
      x.Value = LCase(x.Value)
   Next
End Sub

Sub Proper_Case()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("C1:C5")
      ' There is not a Proper function in Visual Basic for Applications.
      ' So, you must use the worksheet function in the following form:
      x.Value = Application.Proper(x.Value)
   Next
End Sub

Referencias

Para obtener más información sobre cómo usar funciones de hoja de cálculo para cambiar las mayúsculas y minúsculas del texto, haga clic en el número de artículo siguiente para verlo en Microsoft Knowledge Base:

263580 Cómo cambiar las mayúsculas y minúsculas del texto en Excel

Para obtener más información sobre cómo obtener ayuda con Visual Basic para Aplicaciones, haga clic en el siguiente número de artículo para verlo en Microsoft Knowledge Base:

305326 Lista de recursos de programación para Visual Basic para Aplicaciones