Tutorial de Excel: combinar columnas, filas, celdas
La combinación de columnas, filas o celdas generalmente se usa en nuestro trabajo diario de Excel, como combinar el nombre y el apellido que en dos columnas en una columna para obtener el nombre completo, combinar filas basadas en la misma ID y sumar los valores correspondientes, combinar un rango de celdas en una sola celda y así sucesivamente. Este tutorial enumera todos los escenarios sobre la combinación de columnas/filas/celdas en Excel y proporciona las diferentes soluciones para usted.
En este tutorial, creo algunos ejemplos para explicar los métodos, puede cambiar las referencias que necesita cuando usa el código o las fórmulas de VBA a continuación, o puede descargar los ejemplos para probar los métodos directamente.
Haga clic para descargar el archivo de muestra
1 Combinar columnas/filas en una celda
La combinación de columnas o filas en una celda y la separación del resultado por coma, espacio u otros delimitadores, como se muestra a continuación, se usa más ampliamente en Excel.
Combinar columnas en una celda |
Combinar filas en una celda |
1.11 Uso del símbolo de y comercial (&)
En Excel, el símbolo de y comercial & generalmente se usa para unir textos.
Ejemplo: combine el nombre (columna A) y el apellido (columna B) para obtener el nombre completo
Seleccione una celda donde desea colocar el resultado combinado, luego escriba una fórmula como esta:
=A2&" "&B2
En la fórmula, & se usa para unir los textos, A2 y B2 son los dos textos que deben combinarse, " " es el delimitador (espacio) que separa los dos textos en la celda de resultado, si desea usar una coma como delimitador, simplemente escriba una coma entre comillas dobles ",".
Prensa Participar para obtener el resultado combinado, luego arrastre el controlador de autocompletar hacia abajo para obtener los resultados combinados.
Ejemplo: Combinar No. (fila 15) y nombre (fila 16) en una celda
Si desea combinar filas en una celda, cambie las referencias de celda y el separador en la fórmula según lo necesite, y arrastre el controlador de autocompletar hacia la derecha para obtener los resultados combinados.
1.12 Uso de la función CONCATENAR (Excel 2016 o versiones anteriores)
Si está utilizando Excel 2016 o versiones anteriores, la función CONCATENAR puede ayudarlo.
Sintaxis sobre CONCATENAR |
CONCATENATE (text1,[text2],…) |
Para obtener más detalles sobre la función CONCATENAR, visite: CONCATENATE.
Ejemplo: Combinar nombres (columna F) y dirección (columna G) en una sola columna
Seleccione una celda donde desea colocar el resultado combinado, luego escriba una fórmula como esta:
=CONCATENAR(F2,",",G2)
En la fórmula, F2 y G2 son los dos textos que deben combinarse, "," es el delimitador (coma) que separa los dos textos en la celda de resultado, si desea utilizar el espacio como delimitador, simplemente escriba un espacio encerrado entre comillas dobles " ".
Prensa Participar para obtener el resultado combinado, luego arrastre el controlador de autocompletar hacia abajo para obtener los resultados combinados.
Para combinar filas, simplemente cambie las referencias de celda y el delimitador según sea necesario, y arrastre el controlador de autocompletar hacia la derecha.
1.13 Usando la función CONCAT o la función TEXTJOIN (Excel 2019 o Excel 365)
Si usa Excel 2019 o Excel 365, la función CONCAT y la función TEXTJOIN pueden ser la mejor opción.
Sintaxis sobre CONCAT |
CONCAT (text1,[text2],…) |
Para obtener más detalles sobre la función CONCAT, visite: CONCAT.
El uso de la función CONCAT es el mismo que la función CONCATENATE, para combinar el nombre y el apellido en dos columnas por separado en una columna, la fórmula se usa así:
=CONCAT(A21," ",B21)
En la fórmula, A21 y B21 son los dos textos que deben combinarse, " " es el delimitador (espacio) que separa los dos textos en la celda de resultado, si desea utilizar otros delimitadores, simplemente escriba el delimitador encerrado en doble citas "".
Presione la tecla Intro para obtener el resultado combinado, luego arrastre el controlador de autocompletar hacia abajo para obtener los resultados combinados.
A diferencia de la combinación de columnas, al combinar filas, después de ingresar la primera fórmula, debe arrastrar el controlador de autocompletar hacia la derecha hasta obtener todos los resultados combinados.
Sintaxis sobre TEXTJOINT |
TEXTJOIN (delimiter, ignore_empty, text1, [text2], ...) |
Para obtener más detalles sobre la función TEXTJOIN, visite: TEXTJOIN.
Para combinar columnas o filas usando TEXTJOIN:
= UNIÓN DE TEXTO (",", VERDADERO, E21: G21))
En la fórmula, E21:G21 es un rango continuo que debe combinarse. " " es el delimitador (espacio) que separa los dos textos en la celda de resultado, si desea utilizar otros delimitadores, simplemente escriba el delimitador entre comillas dobles "". El texto lógico "VERDADERO" indica ignorar las celdas vacías al combinar, si desea combinar con espacios en blanco, reemplace VERDADERO con FALSO.
Presione la tecla Intro para obtener el resultado combinado, luego arrastre el controlador de autocompletar hacia abajo para obtener los resultados combinados.
Ignorar espacios en blanco |
Incluir espacios en blanco |
1.14 Uso del Bloc de notas (solo para combinar columnas)
1. El uso del Bloc de notas también puede lograr la combinación de columnas (sin efecto en la combinación de filas).
Seleccione el rango en el que desea combinar las columnas en una sola y presione Ctrl + C Teclas para copiar el rango.
2. Abre un Bloc de notasy presione Ctrl + V para pegar el rango copiado.
3. Seleccione una pestaña entre dos textos en el Bloc de notas y presione Ctrl + H para permitir Reemplaza función, se ha colocado un símbolo de tabulación en Encuentra lo que caja de texto.
4. En el Reemplazar con cuadro de texto, escriba el delimitador que desea separar los textos combinados y, a continuación, haga clic en reemplazar todo. Luego cierra el Reemplaza diálogo.
5. Ahora seleccione los textos en el Bloc de notas y presione Ctrl + C para copiarlos, y vaya a Excel, seleccione una celda y presione Ctrl + V para pegar los resultados combinados.
Extensión: combine columnas/filas en una celda con salto de línea como delimitador
Si desea combinar columnas o filas en una celda con un salto de línea como se muestra a continuación:
En primer lugar, debe darse cuenta de que en Excel, CARBONIZARSE() La función se puede usar para especificar caracteres que son difíciles de ingresar en una fórmula, como CHAR (10) devuelve un salto de línea.
Luego use CHAR (10) en las fórmulas que se enumeran arriba para combinar columnas o filas con salto de línea como delimitador:
Símbolo comercial:
=A49&CHAR(10)&B49
Función CONCATENAR:
=CONCATENATE(A49,CHAR(10),B49)
Función CONCAT
=CONCAT(A49,CHAR(10),B49)
Función TEXTJOIN
=TEXTJOIN(CHAR(10),TRUE,A49:B49)
Después de ingresar una fórmula arriba, seleccione los resultados y haga clic en Inicio > Ajustar texto.
Ahora, las columnas se combinan en una sola y están separadas por un salto de línea.
Si solo desea combinar filas en una columna en una sola celda, la función Justificar en Excel puede ayudarlo. Seleccione la columna con varias filas y haga clic en Inicio > Llene > Justificar., las filas se combinarán en la celda superior del rango con un espacio como separador.
En esta parte, el tutorial presenta los métodos para combinar columnas o filas en una celda y omitir celdas vacías como se muestra a continuación:
1.21 Uso de la función TEXTJOIN (Excel 2019 o Excel 365)
Si está utilizando Excel 2019 o Excel 365, afortunadamente, la nueva función TEXTJOIN puede resolver este problema fácilmente.
Sintaxis sobre CONCATENAR |
TEXTJOIN (delimiter, ignore_empty, text1, [text2], ...) |
Para obtener más detalles sobre la función TEXTJOIN, visite: TEXTJOIN.
Ejemplo: combine el nombre (columna A) y el número (columna B) y el dominio (columna C) en una celda para generar una dirección de correo electrónico, algunos números pueden estar en blanco.
Seleccione una celda que solía colocar el resultado combinado, escriba la fórmula como esta:
= UNIÓN DE TEXTO ("", VERDADERO, A2: C2)
En la fórmula, A2:C2 es el rango que contiene los textos que debían combinarse, "" es el delimitador (ninguno) que separa los dos textos en la celda de resultado, si desea usar un delimitador para separar los textos, simplemente escriba el delimitador entre comillas dobles "", como ",". El texto lógico "VERDADERO" indica ignorar las celdas vacías al combinar, si desea combinar con espacios en blanco, reemplace VERDADERO con FALSO.
Prensa Participar para obtener el primer resultado y arrastre el controlador de autocompletar hacia abajo o hacia la derecha según sea necesario para generar todos los resultados.
1.22 Uso del símbolo de y comercial (&)
Si está en Excel 2016 o versiones anteriores de Excel, use el símbolo de y comercial & para conectar los textos uno por uno y omita manualmente los espacios en blanco.
Seleccione una celda donde desea colocar el resultado combinado, luego escriba una fórmula como esta:
=A10&C10
En la fórmula, & se usa para unir los textos, A10 y C10 son los dos textos que deben combinarse, si desea usar una coma como delimitador, simplemente escriba una coma entre comillas dobles como "," y use & para conectar entre dos textos.
Prensa Participar clave para obtener el resultado combinado. Luego cambie las referencias de la fórmula para obtener el siguiente resultado combinado.
1.23 Uso de la función definida
Para los usuarios de Excel 2016 y versiones anteriores de Excel, si es necesario combinar varias columnas o filas mientras se saltan los espacios en blanco, puede usar un VBA para crear una función definida para resolver rápidamente este trabajo.
1. Prensa otro + F11 claves para habilitar el Microsoft Visual Basic para aplicaciones ventana.
2. Hacer clic en recuadro > Módulo para insertar un nuevo módulo.
3. Copie y pegue el siguiente código en el nuevo módulo y guárdelo.
VBA: combinar celdas omitir celdas vacías
Function Concatenatecells(ConcatArea As Range) As String
'updateby Extendoffice
For Each n In ConcatArea: nn = IIf(n = "", nn & "", nn & n & "_"): Next
Concatenatecells = Left(nn, Len(nn) - 1)
End Function
4. Regrese a la hoja de trabajo y seleccione una celda que coloque el resultado combinado, escriba la fórmula
=Concatenatecells(A15:C15)
En la fórmula, A15:C15 es el rango que contiene textos que debían combinarse. En el código de VBA, "_" indica el delimitador que se usó para separar los textos en el resultado combinado, puede cambiar el delimitador según lo necesite.
Si tienes instalado Kutools for Excel en excel, el Combine filas, columnas o celdas sin perder datos La función es de gran ayuda para combinar trabajos.
1. Seleccione las celdas que desea combinar y las celdas en las que desea colocar los resultados combinados.
2. Hacer clic en Kutools > Fusionar y dividir > Combine filas, columnas o celdas sin perder datos.
3. En el cuadro de diálogo emergente, especifique las opciones de la siguiente manera:
1) Especifique para combinar columnas, o combinar filas, o combinar todas las celdas en una sola.
Combinar columnas Ej. | Combinar filas Ej. | Combinar en una sola celda, por ejemplo. |
2) Especifique el separador de los textos en el resultado combinado.
3) Especifique la ubicación del resultado combinado (deshabilitado al elegir la opción Combinar en una sola celda)
Al elegir la opción Combinar columnas, puede especificar colocar el resultado en la celda izquierda del rango seleccionado o en la celda derecha del rango seleccionado.
Celda izquierda Ej. | Celda derecha Ej. |
Al elegir el Combinar filas opción, puede especificar colocar el resultado en la celda superior del rango seleccionado, o en la celda inferior del rango seleccionado.
Celda superior | Celda inferior Ej. |
4) Especificar la operación sobre resultados combinados.
4. Hacer clic en Ok or ¡Aplicá! para terminar la combinación.
Mantener el contenido de las celdas combinadas |
Eliminar contenido de celdas combinadas |
;Fusionar las celdas combinadas |
Para obtener más detalles sobre esta característica, visite Combine columnas, filas, celdas sin perder datos.
Para obtener más detalles sobre Kutools para Excel, visite Kutools for Excel.
Para una prueba gratuita de 30 días de Kutools para Excel, por favor descargar Es ahora.
A veces, es posible que desee combinar dos columnas si una de las columnas contiene celdas en blanco. Suponiendo que hay dos columnas, la columna A contiene nombres de usuario y algunas celdas en blanco, y la columna B contiene nombres, ahora solo complete las celdas en blanco en la columna A con los contenidos correspondientes en la columna B al combinar las dos columnas como se muestra a continuación:
La función IF se utiliza para probar una condición específica. Aquí puede usar la función IF para probar si la celda está en blanco, luego llene los espacios en blanco con el contenido en otra columna.
Sintaxis sobre la función IF |
IF (logical_test, [value_if_true], [value_if_false]) |
Para obtener más detalles sobre la función IF, visite: IF
Seleccione la celda superior de la columna en la que desea colocar los resultados combinados y copie o ingrese la siguiente fórmula:
=SI(A2="",B2,A2)
Entonces presione Participar para obtener el primer resultado y arrastre el controlador de autocompletar hacia abajo para obtener todos los resultados.
Ahora solo las celdas en blanco de la columna A se han llenado con el contenido de la columna B.
Aquí hay un código VBA que también puede manejar este trabajo.
1. Prensa otro + F11 claves para habilitar el Microsoft Visual Basic para aplicaciones ventana, luego haga clic en recuadro > Módulo para crear un nuevo módulo en blanco.
2. Copie y pegue el siguiente código en el nuevo módulo.
VBA: combine dos columnas si está en blanco
Sub MergebyBlank()
'UpdatebyExtendoffice20220506
Dim xRg1, xRg2, xRgUser As Range
Dim xRg As Range
Dim xWsh As Worksheet
Dim xCount, xFNum As Integer
Set xRg1 = Range("A:A")
Set xRg2 = Range("B:B")
Set xWsh = xRg1.Worksheet
Set xRgUser = xWsh.UsedRange
Set xRg1 = Intersect(xRgUser, xRg1)
Set xWsh = xRg2.Worksheet
Set xRgUser = xWsh.UsedRange
Set xRg2 = Intersect(xRgUser, xRg2)
xCount = xRg1.Count
If (xCount > xRg2.Count) Then
xCount = xRg2.Count
End If
For xFNum = 1 To xCount
If (xRg1.Item(xFNum).Value = "") Then
If (xRg2.Item(xFNum).Value <> "") Then
xRg1.Item(xFNum).Value = xRg2.Item(xFNum).Value
End If
ElseIf (xRg2.Item(xFNum).Value = "") Then
If (xRg1.Item(xFNum).Value <> "") Then
xRg2.Item(xFNum).Value = xRg1.Item(xFNum).Value
End If
End If
Next
End Sub
En el código, A:A y B:B son las dos columnas que se fusionarán, simplemente cámbielas según lo necesite.
3. Luego presione F5 tecla o clic Ejecutar botón, entonces la columna A se llenará con el valor en la columna B si el valor está vacío en la columna A.
2 Combinar filas con el mismo ID
Supongamos que hay una tabla con varias columnas, una columna contiene valores de ID que tienen elementos duplicados. Ahora el tutorial proporciona métodos para combinar las filas de la tabla en función del mismo ID y hacer algunos cálculos.
Aquí, en esta parte, proporciona los métodos para combinar filas con la misma ID y separadas por comas, como se muestra a continuación:
Aquí proporciona un código VBA que puede manejar este trabajo
1. Prensa otro + F11 claves para habilitar el Microsoft Visual Basic para aplicaciones ventana, luego haga clic en recuadro > Módulo para crear un nuevo módulo en blanco.
2. Copie y pegue el siguiente código en el nuevo módulo.
VBA: combine filas con la misma ID
Sub Combine_Rows()
'UpdatebyExtendoffice20220506
Dim xRg As Range
Dim xRows As Long
Dim I As Long, J As Long, K As Long
On Error Resume Next
Set xRg = Application.InputBox("Select Range:", "Kutools For Excel", Selection.Address, , , , , 8)
Set xRg = Range(Intersect(xRg, ActiveSheet.UsedRange).Address)
If xRg Is Nothing Then Exit Sub
xRows = xRg.Rows.Count
For I = xRows To 2 Step -1
For J = 1 To I - 1
If xRg(I, 1).Value = xRg(J, 1).Value And J <> I Then
For K = 2 To xRg.Columns.Count
If xRg(J, K).Value <> "" Then
If xRg(I, K).Value = "" Then
xRg(I, K) = xRg(J, K).Text
Else
xRg(I, K) = xRg(I, K).Text & "," & xRg(J, K).Text 'here uses comma as separator, you can change it to others as you need
End If
End If
Next
xRg(J, 1).EntireRow.Delete
I = I - 1
J = J - 1
End If
Next
Next
ActiveSheet.UsedRange.Columns.AutoFit
End Sub
3. Luego presione F5 tecla o clic Ejecutar botón , luego aparece un cuadro de diálogo de Kutools for Excel para que seleccione una tabla que necesita filas combinadas con la misma ID.
4. Hacer clic en OK. Ahora la tabla seleccionada tiene filas combinadas basadas en la misma ID.
2.12 Uso de la función IF para agregar columnas auxiliares
Si solo hay dos columnas y desea combinar las filas con el mismo ID y otros valores de columna separados por una coma como se muestra en la siguiente captura de pantalla, la función IF puede hacerle un favor.
1. Ordene la ID de la A a la Z. Seleccione la columna ID, haga clic en Datos > Ordenar de la A a la Z.
2. Luego, en el Ordenar advertencia diálogo, comprobar Expandir la opción de selección, haga clic en Ordenar.
Ahora los mismos ID se han ordenado juntos.
3. En la columna adyacente, usando la función IF así:
=IF(A17=A18,C17&", "&B18,B18)
En la fórmula, A17 y A18 son las dos celdas adyacentes en la columna ID (A17 es el encabezado de la columna ID), B18 es la celda correspondiente de la celda A18. "," indica separar los valores con una coma. puede cambiar las referencias y el separador según sea necesario.
4. Prensa Participar para obtener el primer resultado, luego arrastre el controlador de autocompletar hacia abajo para obtener todos los resultados.
5. Vaya a la columna adyacente, escriba la fórmula como esta:
=SI(A18<>A19,"Fusionado","")
En la fórmula, A18 y A19 son las dos celdas adyacentes en la columna ID, si las celdas adyacentes no son iguales, volverá a "Fusionado", de lo contrario, volverá vacío.
6. Prensa Participar para obtener el primer resultado, luego arrastre el controlador de autocompletar hacia abajo para obtener todos los resultados.
7. Seleccione la última columna de fórmula, incluido el encabezado, y haga clic en Datos > Filtrar.
8. Haga clic en el Filtrar botón y marca fusionado casilla de verificación en el menú desplegable, haga clic en OK.
Ahora solo se han filtrado las filas combinadas, copie los datos filtrados y péguelos en otro lugar.
Más detalles sobre la función IF. por favor visita: IF.
Si tienes instalado Kutools for Excel en excel, el Filas combinadas avanzadas puede hacer fácilmente este trabajo.
1. Seleccione la tabla y luego haga clic en Kutools > Fusionar y dividir > Filas combinadas avanzadas.
2. En el Filas combinadas avanzadas cuadro de diálogo, haga lo siguiente:
1) Elija la columna ID y configúrela como Clave primaria;
2) Elija la columna en la que desea combinar los valores con separador, haga clic en Combinar y elige un separador.
3)haga clic Ok.
Ahora las filas se han combinado con el mismo ID.
La función de combinación avanzada de filas romperá los datos originales, guarde los datos como una copia antes de usarlos.
Para obtener más detalles sobre esta característica, visite Filas combinadas avanzadas.
Para obtener más detalles sobre Kutools para Excel, visite Kutools for Excel.
Para una prueba gratuita de 30 días de Kutools para Excel, por favor descargar Es ahora.
Si desea combinar filas con el mismo ID y luego sumar los valores o hacer otros cálculos como muestra la siguiente captura de pantalla, los métodos a continuación pueden ayudarlo.
2.21 Uso de la función Consolidar
Si solo hay dos columnas, una columna contiene textos (ID) y otra contiene valores que deben calcularse, como la suma, la función integrada de Excel Consolidar puedo hacerte un favor
1. Seleccione una celda donde desee colocar el resultado combinado, luego haga clic en Datos > Consolidar.
2. En el Consolidar diálogo, haga lo siguiente:
1) Elija el Clave como necesites;
2) Haga clic en la flecha para seleccionar la tabla;
3) Click Añada para agregar el rango seleccionado al Todas las referencias lista;
4) Marque las casillas de verificación de Fila superior y Columna izquierda;
5) Click OK.
Ahora la tabla se ha sumado en función del mismo ID.
Aquí hay un VBA que también puede combinar filas con la misma ID y luego sumar valores.
1. Prensa otro + F11 claves para habilitar el Microsoft Visual Basic para aplicaciones ventana, luego haga clic en recuadro > Módulo para crear un nuevo módulo en blanco.
2. En el nuevo módulo, copie y pegue el siguiente código VBA en él.
VBA: combina filas duplicadas y suma
Sub CombineRows()
'Updateby Extendoffice
Dim WorkRng As Range
Dim Dic As Variant
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Dic = CreateObject("Scripting.Dictionary")
arr = WorkRng.Value
For i = 1 To UBound(arr, 1)
Dic(arr(i, 1)) = Dic(arr(i, 1)) + arr(i, 2)
Next
Application.ScreenUpdating = False
WorkRng.ClearContents
WorkRng.Range("A1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.keys)
WorkRng.Range("B1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.items)
Application.ScreenUpdating = True
End Sub
3. Luego presione F5 tecla o clic Ejecutar botón, luego aparece un cuadro de diálogo para seleccionar la tabla que usa, y luego haga clic en OK.
Ahora el rango seleccionado se ha combinado con los mismos valores y se ha sumado.
El VBA romperá los datos originales, guarde los datos como una copia antes de usar VBA.
2.23 Uso de una herramienta útil: filas de combinación avanzada
Si hay más de dos columnas en la tabla que desea combinar y hacer cálculos, por ejemplo, hay tres columnas, la primera contiene nombres de productos duplicados que deben combinarse, la segunda contiene nombres de tiendas que deben combinarse. combinarse y separarse por una coma, la última columna contiene números que deben sumarse en función de las filas duplicadas en la primera columna, como se muestra a continuación, Kutools for Excel's Advanced Combine Rows puede ayudarlo.
1. Seleccione la tabla y luego haga clic en Kutools > Fusionar y dividir > Filas combinadas avanzadas.
2. En el Filas combinadas avanzadas cuadro de diálogo, haga lo siguiente:
1) Elija la columna ID y configúrela como Clave primaria;
2) Elija la columna en la que desea combinar los valores con un separador, haga clic en Combinar y elige un separador.
3) Elija la columna que desea hacer el cálculo, haga clic en Calcular y elija un cálculo.
4)haga clic Ok.
Ahora las filas se combinaron con las mismas filas y se calcularon.
La función de combinación avanzada de filas romperá los datos originales, guarde los datos como una copia antes de usarlos.
Para obtener más detalles sobre esta característica, visite Filas combinadas avanzadas.
Para obtener más detalles sobre Kutools para Excel, visite Kutools for Excel.
Para una prueba gratuita de 30 días de Kutools para Excel, por favor descargar Es ahora.
Si hay una tabla con varias columnas, una columna contiene algunos valores duplicados, ahora el trabajo es combinar las filas adyacentes en esta columna con los mismos valores que muestra la siguiente captura de pantalla. ¿Cómo puedes resolverlo?
En Excel, no hay una función integrada que pueda resolver directamente este trabajo, pero aquí proporciona un VBA que puede manejarlo.
1. Prensa otro + F11 claves para habilitar el Microsoft Visual Basic para aplicaciones ventana, luego haga clic en recuadro > Módulo para crear un nuevo módulo en blanco.
2. En el nuevo módulo, copie y pegue el siguiente código VBA en él.
VBA: combine filas adyacentes con el mismo valor
Sub MergeSameCell()
'Updateby Extendoffice
Dim Rng As Range, xCell As Range
Dim xRows As Integer
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
Application.DisplayAlerts = False
xRows = WorkRng.Rows.Count
For Each Rng In WorkRng.Columns
For i = 1 To xRows - 1
For j = i + 1 To xRows
If Rng.Cells(i, 1).Value <> Rng.Cells(j, 1).Value Then
Exit For
End If
Next
WorkRng.Parent.Range(Rng.Cells(i, 1), Rng.Cells(j - 1, 1)).Merge
i = j - 1
Next
Next
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
3. Luego presione F5 tecla o clic Ejecutar para habilitar este VBA, luego aparece un cuadro de diálogo para seleccionar la tabla que usa y luego haga clic en OK.
Ahora las filas adyacentes con los mismos valores en la primera columna se combinan en el rango seleccionado.
El VBA romperá los datos originales, guarde los datos como una copia antes de usar VBA. Y este VBA fusionará los mismos valores en la primera columna de la tabla seleccionada.
2.32 Usando una herramienta útil: fusionar las mismas celdas
Si tiene Kutools for Excel instalado en Excel, el Fusionar las mismas celdas La característica de Kutools for Excel puede resolver este trabajo en un solo paso.
Seleccione la columna en la que desea combinar los mismos valores y luego haga clic en Kutools > Fusionar y dividir > Fusionar las mismas celdas.
Ahora las celdas adyacentes con los mismos valores se han fusionado.
I Si desea separar las celdas combinadas y volver a llenar los valores, puede aplicar el Separar celdas y llenar valores .
Para obtener más detalles sobre esta característica, visite Fusionar las mismas celdas.
Para obtener más detalles sobre esta característica, visite Separar celda.
Para obtener más detalles sobre Kutools para Excel, visite Kutools for Excel.
Para una prueba gratuita de 30 días de Kutools para Excel, por favor descargar ahora.
3 celdas combinadas
Para combinar un rango con varias filas y columnas en una sola celda, aquí se proporcionan cuatro métodos.
Ejemplo: Combinar rango A1:C3
3.11 Uso del símbolo de y comercial (&)
En Excel, el símbolo de y comercial & generalmente se usa para unir textos.
Seleccione una celda en la que desee colocar el resultado combinado, luego escriba una fórmula como esta:
=A1&", "&B1&", "&C1&", "&A2&", " &B2&", "&C2&", "&A3&", "&B3&", "&C3
En la fórmula, & se usa para unir los textos, "," es el delimitador (coma + espacio) que separa los dos textos en la celda de resultado, si desea usar otros delimitadores, simplemente escriba un separador entre comillas dobles.
Prensa Participar clave para obtener el resultado combinado.
3.12 Uso de la función CONCATENAR (Excel 2016 o versiones anteriores)
Si está utilizando Excel 2016 o versiones anteriores, la función CONCATENAR puede ayudarlo.
Sintaxis sobre CONCATENAR |
CONCATENATE (text1,[text2],…) |
Para obtener más detalles sobre la función CONCATENAR, visite: CONCATENATE
Seleccione una celda en la que desee colocar el resultado combinado, luego escriba una fórmula como esta:
=CONCATENAR(A1,", ",B1,", ",C1,", ",A2,", ",B2,", ",C2,", ",A3,", ",B3,", " ,C3)
En la fórmula, A1, B1…,C3 son los textos que desea combinar. ", " es el delimitador (coma + espacio) que separa los dos textos en la celda de resultado, si desea utilizar otros delimitadores, simplemente escriba un separador entre comillas dobles.
Entonces presione Participar clave para obtener el resultado combinado.
3. 13 Usando la función CONCAT o la función TEXTJOIN (Excel 2019 o Excel 365)
Si usa Excel 2019 o Excel 365, la función CONCAT y la función TEXTJOIN pueden ser la mejor opción.
Sintaxis sobre CONCAT |
CONCAT (text1,[text2],…) |
Para obtener más detalles sobre la función CONCAT, visite: CONCAT.
El uso de la función CONCAT es el mismo que la función CONCATENATE, para combinar el nombre y el apellido que en dos columnas por separado en una sola columna, la fórmula se usa así:
=CONCAT(A1,", ",B1,", ",C1,", ",A2,", ",B2,", ",C2,", ",A3,", ",B3,", " ,C3)
En la fórmula, A1, B1…,C3 son los textos que desea combinar. ", " es el delimitador (coma + espacio) que separa los dos textos en la celda de resultado, si desea utilizar otros delimitadores, simplemente escriba un separador entre comillas dobles.
Entonces presione Participar clave para obtener el resultado combinado.
Sintaxis sobre TEXTJOIN |
TEXTJOIN (delimiter, ignore_empty, text1, [text2], ...) |
Para obtener más detalles sobre la función TEXTJOIN, visite: TEXTJOIN.
Para combinar columnas o filas usando TEXTJOIN:
= UNIÓN DE TEXTO (", VERDADERO, A1: C3)
En la fórmula, A1:C3 es un rango continuo que debe combinarse. ", " es el delimitador (coma + espacio) que separa los dos textos en la celda de resultado, si desea utilizar otros delimitadores, simplemente escriba el delimitador entre comillas dobles "". El texto lógico "VERDADERO" indica ignorar las celdas vacías al combinar, si desea combinar con espacios en blanco, reemplace VERDADERO con FALSO.
Entonces presione Participar clave para obtener el resultado combinado.
Si desea usar el salto de línea como delimitador, usando CHAR(10) en la fórmula, como =TEXTJOIN(CHAR(10),TRUE,A1:C3), luego formatee la celda de resultado como Ajustar texto.
3.14 Usar Combinar columnas/filas/celdas en una celda sin perder datos
Si tiene Kutools for Excel instalado en Excel, el Combine filas, columnas o celdas sin perder datos característica puede manejar rápidamente este trabajo.
1. Seleccione el rango de celdas que desea combinar en una celda, luego haga clic en Kutools > Fusionar y dividir > Combine filas, columnas o celdas sin perder datos.
2. En el cuadro de diálogo emergente, marque Combinar en una sola celda y especifique un separador según lo necesite, luego haga clic en Ok.
Ahora las celdas se fusionan en una celda con un delimitador específico. Si el contenido de la celda es demasiado para mostrar en la celda combinada, puede hacer clic en Ajustar texto bajo el Inicio pestaña para mostrarlos.
Para obtener más detalles sobre esta característica, visite Combine columnas, filas, celdas sin perder datos.
Para obtener más detalles sobre Kutools para Excel, visite Kutools for Excel.
Para una prueba gratuita de 30 días de Kutools para Excel, por favor descargar Es ahora.
Transponer celdas en una sola columna |
Transponer celdas en una sola fila |
3.21 Nombre el rango y use la función ÍNDICE (solo para una sola columna)
Si desea transponer el rango de celdas en una sola columna, puede nombrar el rango y luego usar la función ÍNDICE.
1. Seleccione el rango de celdas, haga clic derecho para habilitar el menú contextual y haga clic en Definir nombre.
2. En el estallido Nuevo nombre cuadro de diálogo, escriba un nombre en el Nombre cuadro de texto, haga clic en OK.
3. Después de nombrar el rango, luego seleccione una celda que coloque los datos transpuestos, use la función ÍNDICE como esta:
=INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData))+1)
Para obtener más detalles sobre la función ÍNDICE, visite esta página.
4. Prensa Participar y luego arrastre el controlador de autocompletar hacia abajo para completar esta fórmula hasta que aparezca #REF! aparece el valor del error.
5. Elimine el valor de error, luego el rango de celdas se ha combinado en una columna.
3.22 VBA (solo para una sola columna)
Para combinar celdas en una sola columna, aquí hay un VBA que también puede funcionar.
1. Prensa otro + F11 claves para habilitar el Microsoft Visual Basic para aplicaciones ventana, luego haga clic en recuadro > Módulo para crear un nuevo módulo en blanco.
2. Copie y pegue el siguiente código VBA en el módulo en blanco.
VBA: convertir rango en una columna
Sub ConvertRangeToColumn()
'UpdatebyExtendoffice
Dim Range1 As Range, Range2 As Range, Rng As Range
Dim rowIndex As Integer
xTitleId = "KutoolsforExcel"
Set Range1 = Application.Selection
Set Range1 = Application.InputBox("Source Ranges:", xTitleId, Range1.Address, Type:=8)
Set Range2 = Application.InputBox("Convert to (single cell):", xTitleId, Type:=8)
rowIndex = 0
Application.ScreenUpdating = False
For Each Rng In Range1.Rows
Rng.Copy
Range2.Offset(rowIndex, 0).PasteSpecial Paste:=xlPasteAll, Transpose:=True
rowIndex = rowIndex + Rng.Columns.Count
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub
3. Luego presione F5 tecla o clic Ejecutar aparece un cuadro de diálogo para seleccionar un rango de celdas, haga clic en OK.
4. Aparece otro cuadro de diálogo para seleccionar una celda para colocar el resultado, haga clic en OK.
3.23 Usando una herramienta práctica: Transformar rango
Si desea combinar celdas en una fila, no hay una función integrada en Excel que lo admita. Sin embargo, si tienes Kutools for Excel instalado, su Transformar rango La función admite la conversión de un rango en una sola columna o una fila, también admite la conversión de una fila o una columna en un rango.
1. seleccione el rango de celdas y haga clic en Kutools > Gama de Colores > Transformar rango.
2. En el Transformar rango diálogo, comprobar Rango a una sola columna or Rango a una sola fila opción que necesite. Hacer clic OK.
3. Aparece un cuadro de diálogo para seleccionar una celda para colocar el resultado, haga clic en OK.
Ahora el rango de celdas se ha convertido en una fila o una columna.
Para obtener más detalles sobre esta característica, visite Transformar rango.
Para obtener más detalles sobre Kutools para Excel, visite Kutools for Excel.
Para una prueba gratuita de 30 días de Kutools para Excel, por favor descargar Es ahora.
Si hay algunos duplicados en una tabla con varias columnas, ¿cómo puede apilar las columnas en una columna sin los duplicados, como muestra la siguiente captura de pantalla?
En esta parte, proporciona tres métodos diferentes para manejar este trabajo.
3.31 Copiar y pegar y eliminar duplicados
En Excel, el método general para resolver este trabajo es copiar y pegar las columnas una por una y luego eliminar los valores duplicados.
1. Seleccione la primera columna y presione Ctrl + C para copiarlo, luego seleccione una celda de destino y presione Ctrl + V llaves.
2. Luego repita el paso 1 para copiar otras columnas y pegarlas debajo de la primera columna.
3. Luego seleccione la columna apilada, haga clic en Datos > Eliminar duplicados, luego en el Eliminar duplicados cuadro de diálogo, verifique el nombre de la columna, haga clic en OK.
4. Ahora aparece un cuadro de diálogo para recordarle que se eliminan los valores duplicados. Hacer clic OK para cerrarlo, y la columna apilada solo conserva los valores únicos.
Si hay cientos de columnas, copiar y pegar una por una lleva mucho tiempo. Sin embargo, si tienes Kutools for Excel instalado en Excel, el Transformar rango característica puede convertir rápidamente el rango en una columna, luego aplicar el Eliminar duplicados característica de Excel.
Seleccione el rango de columnas y haga clic en Kutools > Gama de Colores > Transformar rango.
Entonces revisa el Rango a una sola columna opción, y haga clic OK para seleccionar una celda para colocar la columna apilada.
Y luego aplique Eliminar duplicados para eliminar los valores duplicados.
Para obtener más detalles sobre esta característica, visite Transformar rango.
Para obtener más detalles sobre Kutools para Excel, visite Kutools for Excel.
Para una prueba gratuita de 30 días de Kutools para Excel, por favor descargar Es ahora.
Además, aquí hay un código VBA que puede resolver este trabajo.
1. Prensa otro + F11 claves para habilitar el Microsoft Visual Basic para aplicaciones ventana, luego haga clic en recuadro > Módulo para crear un nuevo módulo en blanco.
2. Copie y pegue el siguiente código en el nuevo módulo.
VBA: apila columnas en una sin duplicados
Sub FindUniques()
'UpdatebyExtendoffice
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set dic = CreateObject("Scripting.Dictionary")
For j = 1 To InputRng.Columns.Count
For i = 1 To InputRng.Rows.Count
xValue = InputRng.Cells(i, j).Value
If xValue <> "" And Not dic.Exists(xValue) Then
OutRng.Value = xValue
dic(xValue) = ""
Set OutRng = OutRng.Offset(1, 0)
End If
Next
Next
End Sub
3. Luego presione F5 tecla o clic Ejecutar , luego aparece un cuadro de diálogo para seleccionar las columnas que necesitan para ser apiladas, haga clic en Aceptar.
4. Luego, en el segundo cuadro de diálogo emergente, seleccione una celda de destino para colocar la columna apilada y haga clic OK.
Ahora las columnas se han apilado en una columna con valores únicos solamente.
Si hay dos columnas, una tiene un formato especial, como DateTimemm/dd/yyyy personalizado, para combinar estas dos columnas en una sola con los métodos normales, el formato personalizado se eliminará como se muestra en la siguiente captura de pantalla:
Ahora, en esta parte, proporcionará algunas formas de combinar celdas y mantener el formato.
3.41 Incrustar la función TEXTO en la fórmula
La función TEXTO se usa para convertir un número a texto en un formato específico. Aquí podemos usarlo para convertir la celda (que contiene un número) a un formato primero, y luego combinarlo con otras celdas usando "&", la función CONCATENAR, la función CONCAT o la función TEXTJOIN.
Para obtener detalles sobre la combinación general de celdas en una sola, vuelva a 1.1.
Sintaxis sobre la función TEXTO |
TEXT (value, format_text) |
Para obtener más detalles sobre la función TEXTO, visite TEXTO función.
Aquí se toma como ejemplo la función TEXTO incrustada en la función CONCAT.
Copie y pegue la siguiente fórmula en una celda en la que desee colocar el resultado combinado:
=CONCAT(TEXT(A2,"mm/dd/yyyy hh:mm")," ",B2)
En la fórmula, A2 es la celda que desea mantener su formato, "mm/dd/aaaa hh:mm" es el formato que usa, B2 es la otra celda que se usa para combinar. " " indica separar los valores con espacios. puede cambiar las referencias, el formato y el separador según sea necesario.
Prensa Participar y arrastre el controlador de autocompletar hacia abajo para llenar las celdas con esta fórmula.
1. Seleccione la tabla en la que desea combinar las celdas en una sola y presione Ctrl + C para copiarlos.
2. Abre un espacio en blanco Palabra documento, prensa Ctrl + V para colocarlos, luego haga clic en la tabla en el documento, ahora aparece un icono de cruz en la parte superior derecha de la tabla.
3. Haga clic en el Disposición ficha y, a continuación, haga clic Convertir a texto existentes Datos grupo, en el popping Convertir tabla en texto cuadro de diálogo, especifique el separador para las columnas. Hacer clic OK.
Ahora los contenidos de la tabla en Word se han convertido en textos.
4. Seleccione los textos convertidos y presione Ctrl + C para copiarlos, vuelva a Excel y seleccione una celda en blanco, presione Ctrl + V para pegar el resultado combinado.
3.43 Usando una herramienta útil: combine sin perder datos
La forma más eficiente debe ser usando Kutools para Excel, Combine filas, columnas o celdas sin perder datos característica, que solo necesita marcar la casilla Usar valores formateados casilla de verificación al aplicar la característica, el resultado combinado mantendrá el formato de datos.
1. Seleccione la tabla que incluye las celdas que colocan el resultado, haga clic en Kutools > Fusionar y dividir > Combine filas, columnas o celdas sin perder datos.
2. En el cuadro de diálogo emergente, especifique la operación de combinación que necesite y desmarque la Usar valores formateados casilla de verificación (por defecto, esta opción está marcada). Hacer clic Ok.
Ahora los datos se han combinado y mantén el formato.
Para obtener más detalles sobre esta característica, visite Combine columnas, filas, celdas sin perder datos.
Para obtener más detalles sobre Kutools para Excel, visite Kutools for Excel.
Para una prueba gratuita de {module745} días de Kutools para Excel, por favor descargar Es ahora.
Suponiendo que hay una tabla que contiene años, meses y días en columnas separadas, el trabajo es combinar las columnas y generar una fecha como se muestra a continuación:
La función FECHA se utiliza para crear una fecha con año, mes y día.
Sintaxis sobre la función FECHA |
DATE( year, month, day ) |
Para obtener más detalles sobre la función FECHA, visite la función FECHA.
Copie y pegue la siguiente fórmula en una celda que colocará la fecha:
=DATE(A2,B2,C2)
En la fórmula, A2, B2 y C2 son las celdas que contienen los valores de año, mes y día.
Prensa Participar para obtener la primera fecha, luego arrastre el controlador de autocompletar hacia abajo para obtener todas las fechas.
Más tutoriales de Excel:
Combine varios libros de trabajo/hojas de trabajo en uno
Este tutorial enumera casi todos los escenarios de combinación que puede enfrentar y le proporciona soluciones profesionales relativas.
Dividir celdas de texto, número y fecha (separadas en varias columnas)
Este tutorial se divide en tres partes: dividir celdas de texto, dividir celdas numéricas y dividir celdas de fecha. Cada parte proporciona diferentes ejemplos para ayudarlo a saber cómo manejar el trabajo de división cuando se encuentra con el mismo problema.
Combine el contenido de varias celdas sin perder datos en Excel
Este tutorial limita la extracción a una posición específica en una celda y recopila diferentes métodos para ayudar a extraer texto o números de una celda por posición específica en Excel.
Compare dos columnas para coincidencias y diferencias en Excel
Aquí, este artículo cubre la mayoría de los escenarios posibles de la comparación de dos columnas que podría encontrar, y espero que pueda ayudarlo.
Las mejores herramientas de productividad de oficina
Kutools para Excel resuelve la mayoría de sus problemas y aumenta su productividad en un 80%
- Barra de súper fórmula (edite fácilmente varias líneas de texto y fórmulas); Diseño de lectura (leer y editar fácilmente un gran número de celdas); Pegar en rango filtrado...
- Combinar celdas / filas / columnas y conservación de datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir celdas duplicadas; Comparar rangos...
- Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
- Copia exacta Varias celdas sin cambiar la referencia de la fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, Casillas de verificación y más ...
- Fórmulas favoritas e insertar rápidamente, Rangos, gráficos e imágenes; Cifrar celdas con contraseña; Crear lista de distribución y enviar correos electrónicos ...
- Extraer texto, Agregar texto, Eliminar por posición, Quitar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
- Súper filtro (guardar y aplicar esquemas de filtros a otras hojas); Orden avanzado por mes / semana / día, frecuencia y más; Filtro especial en negrita, cursiva ...
- Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes de xls, xlsx y PDF...
- Agrupación de tablas dinámicas por número de semana, día de la semana y más ... Mostrar celdas bloqueadas y desbloqueadas por diferentes colores; Resalte las celdas que tienen fórmula / nombre...
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!