Convertir valores de Microsoft Excel a texto en una Macro de Excel

Seleccione idioma Seleccione idioma
Id. de artículo: 64681 - Ver los productos a los que se aplica este artículo
Expandir todo | Contraer todo

En esta página

Resumen

El siguiente comando de macro convierte un valor numérico en la celda activa en una cadena de texto:
   =FORMULA("="&CHAR(34)&ACTIVE.CELL()&CHAR(34))
				
Por ejemplo, cuando se ejecuta este comando en una celda que contiene el entrada siguiente:
3
la entrada se convierte en lo siguiente:
= "3"

Más información

Microsoft proporciona ejemplos de programación unicamente con fines ilustrativos, sin ninguna garantía tanto expresa como implícita. Esto incluye las garantías implícitas de comerciabilidad o idoneidad para un fin determinado, pero sin limitarse a ellas. Este artículo se supone que está familiarizado con el lenguaje de programación que se muestra y con las herramientas que se utilizan para crear y depurar procedimientos. 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 requerimientos específicos. En el siguiente ejemplo de macro convierte una sola celda o un rango de celdas partir de datos numéricos en texto para que pueden afectar a varias celdas en una tiempo.
A1: Convert_number_to_text
A2: = PARA.CELL("CURRENT",,TRUE)
A3: =FORMULA("="&CHAR(34)&CURRENT&CHAR(34),CURRENT)
A4: =NEXT()
A5: = VOLVER()

Microsoft Excel versión 4.0

Puede asignar esta macro a un botón de Microsoft Excel versión 4.0 por mediante los pasos siguientes:

  1. En el menú Opciones, elija Barras de herramientas.
  2. Elija el botón Personalizar.
  3. En la lista Categorías, seleccione personalizado.
  4. En la lista de botones, arrastre el botón que desea utilizar para ejecutar la macro a la zona de la barra de herramientas.
  5. En la lista Asignar Macro en el cuadro de diálogo asignar a la herramienta, seleccione Macro1!Convert_number_to_text (donde Macro1 es la hoja de macros que contiene la macro y haga clic en Aceptar.
  6. Cierre el cuadro de diálogo Personalizar.
  7. Guardar la hoja de macros, Macro1 en este ejemplo, a la carpeta XLSTART subdirectorio (Windows) o la carpeta de inicio de EXCEL (4) (Macintosh).
  8. Una vez guardado el archivo, elija Ocultar en el menú ventana para ocultar la hoja de macros. Cuando salga de Microsoft Excel, elija Sí para guardar los cambios en la hoja de macros.
Al iniciar Microsoft Excel, por lo tanto, se abrirá automáticamente la hoja de macros que puede ejecutar la macro desde el botón de barra de herramientas personalizada que ha creado.

Microsoft Excel versión 5.0 y posteriores

Nota: Este comando de macro también se aplica a las versiones de Microsoft Excel 5.0 y 7.0, pero no es necesario, debido a la capacidad de formato de celdas como texto. Para dar formato a las celdas como texto en Microsoft Excel versión 5.0 y 7.0, siga los Después de:

  1. Seleccione las celdas que desee dar formato de texto.
  2. En el menú Formato, haga clic en celdas. Seleccione la ficha número.
  3. En la lista Categoría, haga clic en texto y, a continuación, haga clic en Aceptar.
Números que se escriben en estas celdas se formatearán como texto.

Nota: Si el formato de una celda como texto en las versiones de Microsoft Excel 5.0 y 7.0, el valor de celda subyacente todavía si se tratarán como un número, es decir la opción seleccionada en la celda. El siguiente de Visual Basic para Aplicaciones macro convertirá los valores de celda subyacente al texto.
   Sub Convert2Text()

      For Each Cell in Selection.Cells

         OldNF$ = Cell.NumberFormat

         Cell.NumberFormat = "@"

         Cell.Value = Application.Text(Cell.Value, OldNF$)

      Next

   End Sub
				
Para utilizar esta macro, seleccione el rango de celdas que desea convertir a texto y a continuación, ejecute la macro.

Propiedades

Id. de artículo: 64681 - Última revisión: lunes, 20 de mayo de 2013 - Versión: 4.0
La información de este artículo se refiere a:
  • Microsoft Excel 95 Standard Edition
  • Microsoft Excel 5.0 Standard Edition
  • Microsoft Excel 98 para Macintosh
Palabras clave: 
kbcode kbhowto kbprogramming kbmt KB64681 KbMtes
Traducción automática
IMPORTANTE: Este artículo ha sido traducido por un software de traducción automática de Microsoft (http://support.microsoft.com/gp/mtdetails) en lugar de un traductor humano. Microsoft le ofrece artículos traducidos por un traductor humano y artículos traducidos automáticamente para que tenga acceso en su propio idioma a todos los artículos de nuestra base de conocimientos (Knowledge Base). Sin embargo, los artículos traducidos automáticamente pueden contener errores en el vocabulario, la sintaxis o la gramática, como los que un extranjero podría cometer al hablar el idioma. Microsoft no se hace responsable de cualquier imprecisión, error o daño ocasionado por una mala traducción del contenido o como consecuencia de su utilización por nuestros clientes. Microsoft suele actualizar el software de traducción frecuentemente.
Haga clic aquí para ver el artículo original (en inglés): 64681
Renuncia a responsabilidad de los contenidos de la KB sobre productos a los que ya no se ofrece asistencia alguna
El presente artículo se escribió para productos para los que Microsoft ya no ofrece soporte técnico. Por tanto, el presente artículo se ofrece "tal cual" y no será actualizado.

Enviar comentarios

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com