¿Cómo listar todas las combinaciones posibles de una sola columna en Excel?

Si necesitas obtener todas las combinaciones posibles a partir de los datos de una sola columna para lograr un resultado como el que se muestra en la siguiente captura de pantalla, ¿conoces algún método rápido para realizar esta tarea en Excel?

Listar todas las combinaciones posibles de una sola columna con fórmulas

Listar todas las combinaciones posibles de una sola columna con código VBA

Listar todas las combinaciones posibles de una sola columna con fórmulas

Las siguientes fórmulas de matriz pueden ayudarte a realizar este trabajo. Por favor, sigue estos pasos:

1. Primero, debes crear dos celdas auxiliares con fórmulas. En la celda C1, introduce la siguiente fórmula y pulsa las teclas Ctrl + Shift + Enter para obtener el resultado:

2. En la celda C2, introduce la siguiente fórmula y pulsa Ctrl + Shift + Enter para obtener el segundo resultado, como se muestra en la captura:

3. Luego, copia y pega la siguiente fórmula en la celda D2 y pulsa Ctrl + Shift + Enter para obtener el primer resultado, como se muestra en la captura:

4. Después, selecciona esta celda con la fórmula y arrastra el controlador de relleno hacia abajo hasta que aparezcan celdas en blanco. Ahora podrás ver todas las combinaciones de los datos de la columna especificada, como se muestra en la siguiente demostración:

Descubre la Magia de Excel con Kutools AI

• Ejecución Inteligente: Realiza operaciones en celdas, analiza datos y crea gráficos, todo impulsado por comandos simples.
• Fórmulas Personalizadas: Genera fórmulas adaptadas para optimizar tus flujos de trabajo.
• Codificación VBA: Escribe e implementa código VBA sin esfuerzo.
• Interpretación de Fórmulas: Comprende fórmulas complejas con facilidad.
• Traducción de Texto: Supera las barreras del idioma dentro de tus hojas de cálculo.

Potencia tus capacidades de Excel con herramientas impulsadas por IA. ¡Descarga Ahora y experimenta una eficiencia como nunca antes!

Listar todas las combinaciones posibles de una sola columna con código VBA

Las fórmulas anteriores solo están disponibles en versiones recientes de Excel. Si utilizas una versión anterior, el siguiente código VBA puede ayudarte.

1. Pulsa las teclas Alt+ F11 al mismo tiempo para abrir la ventana de Microsoft Visual Basic for Applications.

2. Luego, haz clic en Insertar > Módulo, copia y pega el siguiente código VBA en la ventana.

Código VBA: Listar todas las combinaciones posibles de una sola columna

Sub ConnectArr()
'Updateby ExtendOffice
Dim xDValue As Variant
Dim xOutRg As Range
Dim xDictionary As Object
Dim xF As Long
Dim xChar As String
xDValue = Range("A2:A6").Value 'the data range
Set xOutRg = Range("C1") 'output range
xChar = "," 'separator
For xF = 1 To UBound(xDValue)
    Set xDictionary = CreateObject("Scripting.Dictionary")
    xDictionary(0) = "Sets of " & xF
    Call ConnectValue(xDValue, xDictionary, 0, xF, 0, "", xChar)
    xOutRg.Offset(0, xF - 1).Resize(xDictionary.Count).Value = WorksheetFunction.Transpose(xDictionary.Items)
    Set xDictionary = Nothing
Next
End Sub
Sub ConnectValue(ByRef pDValue, ByRef pDictionary, ByRef pLevel, ByVal pMaxLevel, ByVal pIndex, ByVal pValue, ByVal pChar)
Dim xF As Long
If pLevel = pMaxLevel Then
    pDictionary(pDictionary.Count + 1) = pValue
    Exit Sub
End If
For xF = pIndex + 1 To UBound(pDValue)
    If pValue = "" Then
        Call ConnectValue(pDValue, pDictionary, pLevel + 1, pMaxLevel, xF, pDValue(xF, 1), pChar)
    Else
        Call ConnectValue(pDValue, pDictionary, pLevel + 1, pMaxLevel, xF, pValue & pChar & pDValue(xF, 1), pChar)
    End If
Next
End Sub

3. Después, pulsa la tecla F5 para ejecutar este código. Todas las combinaciones de la columna se mostrarán como en la siguiente captura de pantalla: