¿Cómo concatenar valores únicos en Excel?

Concatenar valores únicos en Excel es una tarea común que se puede lograr a través de varios métodos. Este artículo explorará diferentes técnicas para concatenar valores únicos en una columna y enumerar valores únicos mientras se concatenan sus valores correspondientes.

Concatenar solo valores únicos de una columna

• Usando las funciones TEXTJOIN y UNIQUE
• Usando Kutools AI Aide
• Usando una Función Definida por el Usuario

Enumerar valores únicos y concatenar valores correspondientes

• Usando las funciones TEXTJOIN y UNIQUE
• Usando Kutoolsfor Excel
• Usando código VBA

Concatenar solo valores únicos de una columna

En el análisis de datos, hay casos en los que necesitas concatenar valores únicos de una columna en Excel en una sola celda. Esta tarea se puede lograr utilizando fórmulas, VBA o Kutools, dependiendo de tus preferencias y la complejidad del conjunto de datos. A continuación, exploraremos métodos optimizados para manejar esto de manera eficiente.

Método 1: Usando las funciones TEXTJOIN y UNIQUE

Si tienes Excel 365 o Excel 2021, sus nuevas funciones TEXTJOIN y UNIQUE proporcionan una forma simple y eficiente de concatenar valores únicos de una columna.

Usa la siguiente fórmula en una celda donde deseas el resultado concatenado:

=TEXTJOIN(", ", TRUE, UNIQUE(A2:A18))

Método 2: Usando Kutools AI Aide

Para una solución más rápida y completamente automatizada, Kutools for Excel proporciona una herramienta innovadora—"Kutools AI Aide". Simplemente describe tu tarea, y la IA generará instantáneamente los resultados deseados sin ninguna configuración manual. Esto elimina la necesidad de fórmulas complejas o configuraciones que consumen tiempo, entregando resultados precisos en segundos.

Después de instalar Kutools For Excel, haz clic en "Kutools" > "AI Aide" para abrir el panel "Kutools AI Aide".

1. Selecciona las celdas que deseas combinar solo con valores únicos;
2. Escribe el requisito en el cuadro de chat: como:
   Concatenar valores únicos con comas desde el rango seleccionado y poner el resultado combinado en la celda C2
3. Luego, presiona la tecla Enter o haz clic en el botón "Enviar". Kutools AI analizará la pregunta, después de terminar, haz clic en el botón "Ejecutar" para obtener el resultado.
   

Método 3: Usando una Función Definida por el Usuario

Para usuarios avanzados que necesitan más flexibilidad o quieren automatizar el proceso, se puede crear una función personalizada de VBA (UDF) para concatenar valores únicos. Este método es ideal para usuarios cómodos con la codificación o aquellos que necesitan una solución reutilizable.

1. Mantén presionadas las teclas "ALT + F11" para abrir la ventana "Microsoft Visual Basic para Aplicaciones".

2. Haz clic en "Insertar" > "Módulo", y pega el siguiente código en la Ventana del Módulo.

Código VBA: Concatenar valores únicos en una sola celda:

Function ConcatUniq(xRg As Range, xChar As String) As String
'updateby Extendoffice
    Dim xCell As Range
    Dim xDic As Object
    Set xDic = CreateObject("Scripting.Dictionary")
    For Each xCell In xRg
        xDic(xCell.Value) = Empty
    Next
    ConcatUniq = Join$(xDic.Keys, xChar)
    Set xDic = Nothing
End Function

3. Luego regresa a tu hoja de trabajo, e introduce esta fórmula: =ConcatUniq (A2:A18,",") en una celda en blanco donde deseas mostrar el resultado concatenado, y presiona la tecla Enter para obtener el resultado concatenado único, ver captura de pantalla:

Enumerar valores únicos y concatenar valores correspondientes

En Excel, enumerar valores únicos y concatenar sus valores correspondientes es una tarea común, especialmente al trabajar con conjuntos de datos que requieren resumen o consolidación. Esta sección proporciona una guía completa para lograr esto de manera eficiente.

Método 1: Usando las funciones TEXTJOIN y UNIQUE

Las funciones modernas de Excel como UNIQUE, FILTER y TEXTJOIN facilitan enumerar valores únicos y concatenar sus valores correspondientes sin necesidad de fórmulas complejas.

1. Usa la función UNIQUE para enumerar todos los valores únicos de la columna A:

=UNIQUE(A2:A17)

2. Aplica las funciones TEXTJOIN y FILTER para concatenar los valores correspondientes para el valor único, arrastra la fórmula hacia abajo para llenar otras celdas, ver captura de pantalla:

=TEXTJOIN(", ", TRUE, FILTER($B$2:$B$17, $A$2:$A$17 =D2))

Método 2: Usando Kutools for Excel

Si tienes Kutools for Excel, su poderosa función "Combinar filas avanzado" te permite enumerar fácilmente valores únicos y concatenar sus valores correspondientes—rápida y fácilmente, sin necesidad de codificación ni fórmulas complejas. Simplemente selecciona tus datos, configura las opciones y deja que Kutools haga el resto, entregando resultados profesionales en segundos.

1. Copia y pega los datos originales en otra celda para hacer una copia de seguridad de los datos. Selecciona el rango de datos, luego, haz clic en "Kutools" > "Combinar y dividir" > "Combinar filas avanzado", ver captura de pantalla:

2. En el cuadro de diálogo "Combinar filas avanzado", configura las opciones:

• Haz clic en el nombre de la columna en la que deseas combinar duplicados, y luego selecciona "Clave principal" de la lista desplegable en la columna "Operación";
• Luego, selecciona el nombre de la columna en la que deseas combinar los valores, y luego selecciona un delimitador para separar los valores de la lista desplegable en la columna "Operación";
• Finalmente, haz clic en el botón Aceptar.
  

Resultado:

Kutools automatiza el proceso de extraer valores únicos y concatenar sus valores correspondientes con el delimitador especificado.

Método 3: Usando código VBA

Aunque las funciones integradas de Excel como UNIQUE y TEXTJOIN pueden manejar esto hasta cierto punto, pueden ser insuficientes al lidiar con escenarios complejos o versiones antiguas de Excel. Ya seas principiante o usuario avanzado, esta guía te llevará a través de los pasos para enumerar valores únicos y concatenar sus valores correspondientes usando código VBA.

1. Mantén presionadas las teclas "ALT + F11" para abrir la ventana "Microsoft Visual Basic para Aplicaciones".

2. Haz clic en "Insertar" > "Módulo", y pega el siguiente código en la Ventana del Módulo.

Código VBA: Enumerar valores únicos y concatenar datos correspondientes

Sub test()
    'updateby Extendoffice
    Dim xRg As Range
    Dim xArr As Variant
    Dim xCell As Range
    Dim xTxt As String
    Dim I As Long
    Dim xDic As Object
    Dim xOutputRg As Range
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the data range", "Kutools for Excel", xTxt, , , , , 8)
    Set xRg = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
    If xRg Is Nothing Then Exit Sub
    If xRg.Areas.Count > 1 Then
        MsgBox "Does not support multiple selections", , "Kutools for Excel"
        Exit Sub
    End If
    If xRg.Columns.Count <> 2 Then
        MsgBox "There must be only two columns in the selected range", , "Kutools for Excel"
        Exit Sub
    End If
    Set xOutputRg = Application.InputBox("Please select the output cell", "Kutools for Excel", Type:=8)
    If xOutputRg Is Nothing Then Exit Sub
    xArr = xRg
    Set xDic = CreateObject("Scripting.Dictionary")
    xDic.CompareMode = 1
    For I = 1 To UBound(xArr)
        If Not xDic.Exists(xArr(I, 1)) Then
            xDic.Item(xArr(I, 1)) = xDic.Count + 1
            xArr(xDic.Count, 1) = xArr(I, 1)
            xArr(xDic.Count, 2) = xArr(I, 2)
        Else
            xArr(xDic.Item(xArr(I, 1)), 2) = xArr(xDic.Item(xArr(I, 1)), 2) & "," & xArr(I, 2)
        End If
    Next
    xOutputRg.Resize(xDic.Count, 2).Value = xArr
End Sub

3. Luego presiona la tecla F5 para ejecutar este código, y aparecerá un cuadro de diálogo para recordarte que selecciones el rango de datos que deseas concatenar basado en los valores únicos, ver captura de pantalla:

4. Haz clic en Aceptar, aparecerá otro cuadro de diálogo para recordarte que selecciones las celdas donde colocar el resultado:

5. Haz clic en Aceptar, los valores únicos han sido extraídos y sus valores correspondientes en otra columna han sido concatenados juntos. Ver captura de pantalla:

En conclusión, concatenar valores únicos en Excel puede lograrse eficientemente a través de múltiples métodos adaptados a diferentes niveles de experiencia y necesidades. Al elegir el método que mejor se adapte a tus requisitos, puedes agilizar el procesamiento de datos y mejorar la eficiencia al manejar valores únicos en Excel. Si estás interesado en explorar más consejos y trucos de Excel, nuestro sitio web ofrece miles de tutoriales.