Estás trabajando sin conexión, espera a que vuelva la conexión a Internet

Código de macro de ejemplo para cambiar el modelo de mayúsculas y minúsculas del texto en Excel

Ha finalizado el soporte técnico para Office 2003

Microsoft puso fin al soporte técnico para Office 2003 el 8 de abril de 2014. Este cambio ha afectado a las actualizaciones de software y las opciones de seguridad. Sepa qué significa esto en su caso y cómo puede mantenerse protegido.

Este artículo se publicó anteriormente con el número E291323
Para obtener una versión de este artículo para Microsoft Excel 2000, vea 213649.
Para obtener una versión de este artículo para Microsoft Excel 98 y versiones anteriores, vea 141094.
Resumen
Aunque Microsoft Excel tiene funciones que cambian las mayúsculas y minúsculas del texto, en ocasiones es posible que desee cambiarlas mediante programación.

Este artículo contiene tres macros de ejemplo de Microsoft Visual Basic para Aplicaciones (procedimientos Sub) que puede utilizar para cambiar las letras de una cadena de texto a todo en mayúsculas, todo en minúsculas o sólo la letra inicial en mayúsculas (la primera letra de cada palabra en mayúsculas). Estas acciones son similares a las funciones de Excel =UPPER(), =LOWER() y =PROPER().
Más información
Microsoft proporciona ejemplos de programación con fines ilustrativos únicamente, sin ninguna garantía tanto expresa como 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.

Macro para cambiar todo el texto de un rango a mayúsculas

Sub Uppercase() ' Recorrer cada celda del rango especificado. For Each x In Range("A1:A5") ' Cambiar el texto del rango a letras mayúsculas. x.Value = UCase(x.value) Next End Sub				

Macro para cambiar todo el texto de un rango a minúsculas

Sub Lowercase() ' Recorrer cada celda del rango especificado. For Each x In Range("B1:B5") x.Value = LCase(x.Value) Next End Sub				

Macro para cambiar todo el texto de un rango de celdas a mayúsculas iniciales

Sub Proper_Case() ' Recorrer cada celda del rango especificado. For Each x In Range("C1:C5") ' No hay una función Proper en Visual Basic para Aplicaciones. ' Por lo tanto, debe utilizar la función de hoja de cálculo de la forma siguiente: x.Value = Application.Proper(x.Value) Next End Sub				

Probar las macros de ejemplo

Para probar las macros de ejemplo, siga estos pasos:
  1. En el mismo libro que contiene las macros, escriba los datos del ejemplo siguiente en una nueva hoja de cálculo:
        A1: toM         B1: toM        C1: toM A2: sUe         B2: sUe        C2: sUe A3: joe SMITH   B3: joe SMITH  C3: joe SMITH A4: mary        B4: mary       C4: mary A5: LORI        B5: LORI       C5: LORI						
    NOTA
    Estos datos de ejemplo contienen texto con diversas combinaciones de mayúsculas y minúsculas que puede utilizar para comprobar cómo funciona cada macro.
  2. Ejecute cada macro.
Al texto del rango especificado en la macro (en la línea en la que indica "For each x in...") se le dará formato en mayúsculas, minúsculas o mayúsculas iniciales, como corresponda.
Referencias
Para obtener más información acerca de cómo utilizar las funciones de hojas 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 el modelo de mayúsculas y minúsculas del texto en Excel
Para obtener más información acerca de cómo obtener ayuda con Visual Basic para Aplicaciones, haga clic en el número de artículo siguiente para verlo en Microsoft Knowledge Base:
305326 Lista de recursos de programación de Visual Basic para Aplicaciones
upper lower proper upper- lower- mayúsculas iniciales mayúsculas minúsculas inf XL2002 XL 2000 XL2003 XLX XL2001 XL 97 XL2004 xl2007
Propiedades

Id. de artículo: 291323 - Última revisión: 12/26/2006 17:40:40 - Revisión: 5.0

Microsoft Office Excel 2007, Microsoft Office Excel 2003, Microsoft Excel 2002 Standard Edition, Microsoft Excel 2000 Standard Edition, Microsoft Excel 97 Standard Edition, Microsoft Excel 2004 for Mac, Microsoft Excel X para Macintosh, Microsoft Excel 2001 para Macintosh

  • kbdtacode kbhowto kbprogramming KB291323
Comentarios