Tabla de contenido
Una de las tareas más importantes y más utilizadas que tenemos que realizar mientras trabajamos en Excel es combinar celdas verticalmente sin perder ningún dato. Hoy te mostraré cómo puedes combinar celdas en Excel verticalmente sin perder datos.
Descargar el cuaderno de prácticas
Combinar celdas verticalmente sin perder datos.xlsm4 métodos fáciles para combinar celdas en Excel verticalmente sin perder datos
Aquí tenemos un conjunto de datos con los Nombres de algunos Autores y sus Libros en una librería llamada Librería Martin.
Nuestro objetivo hoy es unir los nombres de los libros del mismo autor verticalmente en una celda sin perder ningún dato.
1. Ejecute la Herramienta Combinar y Centrar de la Barra de Herramientas de Excel para Combinar Celdas en Excel Verticalmente Sin Perder Datos
Primer paso:
➤ Seleccione el primer grupo de celdas que desee combinar (Los libros de Charles Dickens en este ejemplo).
Segundo paso:
➤ Ir a la Inicio> Fusionar & Centro en la barra de herramientas de Excel, en la sección denominada Alineación .
Tercer paso:
➤ Haz clic en el menú desplegable.
➤ Entre las opciones disponibles, seleccione Fusionar & Centrar .
Paso 4:
➤ Haga clic en Fusionar & Centrar .
➤ Encontrará su grupo de celdas seleccionado fusionado en una sola celda, pero conteniendo sólo el valor de la primera celda (Gran Dickens en este ejemplo).
Paso 5:
➤ Puede repetir el mismo procedimiento para el resto del grupo de celdas para fusionarlas en una sola.
Más información: Cómo unir y centrar celdas en Excel
2. Usar el Símbolo Ampersand (&) para Combinar Celdas en Excel Verticalmente Sin Perder Datos
El método mencionado fusiona el grupo de células en una única célula, pero no cumple completamente nuestro requisito.
Mantiene el valor sólo de la primera celda, no de todas las celdas.
Es decir, pierde datos.
Para combinar los valores de un grupo de celdas en una sola celda, puede utilizar una fórmula que incluya la fórmula Ampersand (&) símbolo.
La fórmula para el primer grupo de celdas será:
=C4&", "&C5&", "&C6 Nota:
- Aquí he utilizado comas (,) entre los nombres de los libros para estar presentable. Puedes usar lo que quieras.
A continuación, repita el mismo procedimiento para todos los grupos de células.
3. Utilizar la fórmula para combinar celdas en Excel verticalmente sin perder datos
En lugar de utilizar el Ampersand (&) puede utilizar el símbolo Función CONCATENAR de Excel para fusionar un grupo de celdas en una sola celda.
La fórmula para combinar el primer grupo de celdas será:
=CONCATENAR(C4,", ",C5,", ",C6)
Nota:
- Aquí también he utilizado comas (,) entre los nombres de los libros. Puedes usar lo que quieras.
A continuación, puede utilizar esta fórmula para el resto del grupo de celdas para fusionarlas en una sola celda.
4. Ejecutar Códigos VBA para Combinar Celdas en Excel Verticalmente Sin Perder Datos
Todos los métodos mencionados anteriormente funcionan perfectamente bien, pero aún así, no cumplen nuestro propósito por completo.
Queremos derivar un método que fusione todos los grupos de celdas en celdas individuales con un solo clic.
Y sí, hay formas de hacerlo. En esta sección, derivaremos un método utilizando un VBA código que fusionará todos los grupos de celdas en celdas individuales de la forma más sencilla posible.
Primer paso:
➤ Pulse ALT+F11 del teclado. VBA se abrirá la ventana.
Segundo paso:
➤ Ir a la Inserte en la ventana VBA.
➤ Entre las opciones disponibles, seleccione Módulo .
Tercer paso:
➤ Una nueva ventana de módulo llamada "Módulo 1" se abrirá.
➤ Inserte lo siguiente VBA en el módulo.
Código:
Sub Merging_Rows() Dim out As Variant out = " Dim start As Variant start = 1 Dim ending As Variant ending = 1 Dim i As Variant Dim j As Variant For i = 2 To Selection.Rows.Count + 1 If Selection(i, 1) "" Or i = Selection.Rows.Count + 1 Then ending = i - 1 For j = start To ending If j = ending Then out = out + Range(Selection(j, 2).Address).ValueElse: out = out + Range(Selection(j, 2).Address).Value + vbNewLine End If Next j Range(Selection(start, 2).Address) = out Range(Selection(start, 1).Address + ":" + Selection(ending, 1).Address).Merge Across:=False Range(Selection(start, 2).Address + ":" + Selection(ending, 2).Address).Merge Across:=False start = iout = "" End If Next i End Sub 
Paso 4:
➤ Guarde el libro de trabajo como Libro de Excel habilitado para macros .
Paso 5:
➤ Vuelva a su libro de trabajo y seleccione el conjunto de datos (sin el botón Encabezados de columna ).
Paso 6:
➤ Pulse ALT+F8 en el teclado.
➤ Un cuadro de diálogo llamado Macro Seleccione Fusionar_filas y haga clic en Ejecutar .
Paso 6:
➤ Aparecerá un cuadro de advertencia que le indicará que al combinar celdas sólo se conserva el valor de la celda superior izquierda y se descartan los demás valores
➤ Haga clic en OK .
Paso 7:
➤ Aparecerá varias veces el mismo cuadro de advertencia. Haga clic en OK siempre.
➤ Finalmente, encontrará todos sus grupos de celdas fusionados verticalmente en celdas individuales como ésta.
Conclusión
Usando estos métodos, puedes combinar celdas en Excel verticalmente sin perder datos. ¿Conoces algún otro método? ¿O tienes alguna pregunta? No dudes en preguntarnos.
