Concatenar columnas en Excel

Compatibilidad: Excel 365 2021 2019 2016

Podemos concatenar (unir) los valores de las celdas de la columna A y columna B sobre otra columna en Excel.

Concatenar columnas en Excel

En la columna A disponemos del valor de fecha y en la columna B el nombre de la empresa. En la columna C concatenaremos los valores de A y B.

Concatenar columnas en Excel
  • CREAR MACRO
  1. Con Excel abierto.

  2. Pulsar la tecla Alt y mantener pulsada / Pulsar la tecla F11. Mostrará el editor de Visual Basic.

  3. Ir a: Barra de Menú / Insertar / Módulo. Mostrará la ventana del módulo donde escribimos la macro.

    Explorador de Proyectos con módulo1 seleccionado
  4. Escribir el código de la macro:

    Sub UneColumnas()

    Dim mi_hoja As Worksheet
    Dim mi_final As Long
    Dim x As Long

    Set mi_hoja = ActiveSheet
    mi_final = mi_hoja.Cells.SpecialCells(xlLastCell).Row
    For x = 1 To mi_final

    If Len(mi_hoja.Cells(x, 1)) > 0 And Len(mi_hoja.Cells(x, 2)) > 0 Then
    mi_hoja.Cells(x, 3).Value = mi_hoja.Cells(x, 1).Value & " - " & mi_hoja.Cells(x, 2).Value
    End If
    Next
    End Sub

    " - ", " | ", " ; "... Tipo de separador entre columnas.
    (x, 1). Número de la columna 1ª.
    (x, 2). Número de la columna 2ª.
    (x, 3). Número de la columna donde unir las celdas.

  5. Guardar el libro con la extensión *.xlsm. Libro habilitado para macros.

  • EJECUTAR MACRO
  1. Ejecutar la macro: UneColumnas.

  2. Verificar como en la columna C se muestran los valores concatenados de las celdas de A y B.

Columna A y B concatenada en C
Nivel de dificultad: Experto VBA-Macros Excel Experto VBA - Macros

- Consultar:

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *

Este sitio usa Akismet para reducir el spam. Aprende cómo se procesan los datos de tus comentarios.