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

Macro de VBA para concatenar columnas de datos en Excel

Support for Office 2003 has ended

Microsoft ended support for Office 2003 on April 8, 2014. This change has affected your software updates and security options. Learn what this means for you and how to stay protected.

Resumen
En Microsoft Excel, puede utilizar una macro para concatenar los datos de dos columnas adyacentes y mostrar el resultado en la columna situada a la derecha de las columnas que contienen los datos. Este artículo contiene una macro de ejemplo (procedimiento Sub) de Microsoft Visual Basic para Aplicaciones (VBA) para hacerlo.
Más información
Microsoft proporciona ejemplos de programación solamente como ilustración, 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 ayudar a explicar la funcionalidad de un procedimiento en particular. Sin embargo, no modificarán estos ejemplos para proporcionar una funcionalidad adicional ni crearán procedimientos que cumplan sus requisitos específicos.

Macro de ejemplo de Visual Basic para Aplicaciones (VBA)

Sub ConcatColumns()   Do While ActiveCell <> ""  'Loops until the active cell is blank.      'The "&" must have a space on both sides or it will be      'treated as a variable type of long integer.      ActiveCell.Offset(0, 1).FormulaR1C1 = _         ActiveCell.Offset(0, -1) & " " & ActiveCell.Offset(0, 0)      ActiveCell.Offset(1, 0).Select   LoopEnd Sub				
NOTA: la instrucción ActiveCell.Offset(0, 1).FormulaR1C1 puede reemplazarse con la instrucción ActiveCell.Offset(0, 1).Formula. Ambas pueden utilizarse indistintamente si está utilizando texto y números únicamente (no fórmulas). La parte R1C1 utilizada al final de la primera instrucción hace referencia a la fila uno, columna uno y es el formato utilizado en los ejemplos de la Ayuda.

Cómo utilizar la macro en Microsoft Office Excel 2007

  1. Abra el libro que contiene los datos.
  2. Presione Alt+F11 para iniciar el Editor de Visual Basic.
  3. En el menú Insertar, haga clic en Módulo para insertar un módulo. Escriba la macro en la ventana de código del módulo.
  4. En el menú Archivo, haga clic en Cerrar y volver a Microsoft Excel.
  5. Seleccione la hoja de cálculo que contiene los datos que desea concatenar.
  6. Haga clic en la celda superior de la columna derecha de datos que desea concatenar. Por ejemplo, si las celdas A1:A100 y B1:B100 contienen datos, haga clic en la celda B1.
  7. Haga clic en la ficha Programador. Si la ficha Programador no se muestra, siga estos pasos:
    1. Haga clic en el Botón de Microsoft Office y, a continuación, haga clic en Opciones de Excel.
    2. Haga clic en Popular.
    3. Haga clic para activar la casilla Mostrar ficha Programador en la cinta de opciones.
    4. Haga clic en Aceptar para cerrar el cuadro de diálogo Opciones de Excel.
  8. Haga clic en Macros en el grupo Código.
  9. Seleccione la macro ConcatColumns y haga clic en Ejecutar.

Cómo utilizar la macro en Microsoft Office Excel 2003 y en versiones anteriores de Excel

  1. Abra el libro que contiene los datos.
  2. Presione Alt+F11 para iniciar el Editor de Visual Basic.
  3. En el menú Insertar, haga clic en Módulo para insertar un módulo. Escriba la macro en la ventana de código del módulo.
  4. En el menú Archivo, haga clic en Cerrar y volver a Microsoft Excel.
  5. Seleccione la hoja de cálculo que contiene los datos que desea concatenar.
  6. Haga clic en la celda superior de la columna derecha de datos que desea concatenar. Por ejemplo, si las celdas A1:A100 y B1:B100 contienen datos, haga clic en la celda B1.
  7. En el menú Herramientas, seleccione Macros y haga clic en Macro. Seleccione la macro ConcatColumns y haga clic en Ejecutar.
Referencias
Para obtener más información acerca de Visual Basic para Aplicaciones, haga clic en el número de artículo siguiente para verlo en Microsoft Knowledge Base:
226118 Lista de recursos disponibles para ayudarle a programar en Visual Basic para Aplicaciones
5.00c 8.00 XL5 operator ampersand XL2000 XL xl2003 XL2003 xl2007
Propiedades

Id. de artículo: 213477 - Última revisión: 03/25/2008 09:40:49 - Revisión: 4.0

Microsoft Office Excel 2007, Microsoft Office Excel 2003, Microsoft Excel 2002 Standard Edition, Microsoft Excel 2000 Standard Edition

  • kbexpertiseinter kbdtacode kbhowto kbprogramming KB213477
Comentarios