Unir celdas con macro en Excel

Compatibilidad: Truco compatible con Excel 365Truco compatible con Excel 2016Truco compatible con Excel 2013Truco compatible con Excel 2010Truco compatible con Excel 2007

En ocasiones es necesario concatenar el valor de diferentes celdas, pudiendo unir celdas con macro en Excel.

En Excel disponemos de la función CONCATENAR que realiza dicha labor.

Disponemos del rango A1:C13 con el origen de los datos. Y deseamos insertar un valor de cada columna en una celda nueva.

Rango A1:C13 con origen de datos, A17 con datos de A9, B4 y C4.
  1. Abrir el libro deseado / Guardar con la extensión *.xlsm. Libro habilitado para macros.

  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.

  4. Escribir el código de la macro:

    Sub Concatena_Celdas()

    Celda = ""

    For Each Valor In Selection

    Celda = Celda & " " & Valor.Value

    Next Valor

    ActiveCell.Value = Celda

    ActiveCell.Font.ColorIndex = 3

    End Sub

    ActiveCell.Font.ColorIndex = 3. Aplica color rojo al texto del resultado (como índica).

  • COMANDO: BOTÓN. Podemos insertar un botón que ejecute la macro unir celdas con macro.

  1. Ir a: Cinta de Opciones / Pestaña: Programador / Grupo: Controles / Insertar / Controles de formulario / Botón. Seleccionamos el control deseado.

    Botón insertar, mostrando los controles disponibles
  2. Clic sobre cualquier celda de la hoja. Mostrará el cuadro de diálogo de asignar macro.

  3. Ir a: Nombre de la macro / Clic sobre la macro deseada.

  4. Pulsar el botón Aceptar. Cierra la ventana y asigna la macro al botón.

  5. Situar el cursor del ratón sobre el botón / Botón derecho / Modificar texto / Escribir: Insertar. O el rótulo del botón.

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

  1. Pulsar la tecla Ctrl y mantener pulsada / Clic sobre A6 (Mayo o el mes deseado) / Clic sobre B5 (María José o el comercial deseado) / Clic sobre C3 (Sur o la zona deseada) / Clic sobre la celda A18 (O la celda donde concatenar el resultado) / Soltar la tecla Ctrl.

  2. Pulsar el botón Insertar. Para ejecutar la macro en la última celda seleccionada.

Unir celdas con macro en Excel: Celda A18 con los valores de A6, B5 y C3

Disponiendo así de una macro que nos permita "Unir celdas con macro en Excel".

Nivel de dificultad: Experto VBA-Macros Excel Experto VBA – Macros

Deja un comentario

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