Kako našteti ali ustvariti vse možne kombinacije v Excelu?

Recimo, da imam naslednja dva stolpca podatkov, zdaj pa želim ustvariti seznam vseh možnih kombinacij na podlagi obeh seznamov vrednosti, kot je prikazano na levi sliki zaslona. Mogoče lahko naštejete vse kombinacije eno za drugo, če je vrednosti malo, če pa je za naštevanje možnih kombinacij več stolpcev z več vrednostmi, je tukaj nekaj hitrih trikov, ki vam lahko pomagajo pri reševanju te težave v Excelu. .

Navedite ali ustvarite vse možne kombinacije iz dveh seznamov s formulo

Navedite ali ustvarite vse možne kombinacije s treh ali več seznamov s kodo VBA

Seznam ali generiranje vseh možnih kombinacij iz več seznamov z zmogljivo funkcijo

Navedite ali ustvarite vse možne kombinacije iz dveh seznamov s formulo

Naslednja dolga formula vam lahko pomaga hitro našteti vse možne kombinacije vrednosti dveh seznamov. Naredite naslednje:

1. Vnesite ali kopirajte spodnjo formulo v prazno celico, v tem primeru jo vnesem v celico D2 in nato pritisnem Vnesite tipko, da dobite rezultat, glejte sliko zaslona:

2. Nato izberite celico D2 in povlecite ročico za polnjenje navzdol do celic, dokler ne dobite praznih celic, na podlagi vrednosti dveh seznamov pa so bile navedene vse možne kombinacije. Oglejte si posnetek zaslona:

Navedite ali ustvarite vse možne kombinacije s treh ali več seznamov s kodo VBA

Mogoče je zgornjo formulo nekoliko težko uporabiti, če je podatkov o stolpcih več, bo to težavno za spreminjanje. Tukaj bom predstavil kodo VBA za hitro obravnavo.

1. Držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v Moduli Okno.

Koda VBA: ustvari vse kombinacije 3 ali več stolpcev

Sub ListAllCombinations()
'Updateby Extendoffice
Dim xDRg1, xDRg2, xDRg3 As Range
Dim xRg  As Range
Dim xStr As String
Dim xFN1, xFN2, xFN3 As Integer
Dim xSV1, xSV2, xSV3 As String
Set xDRg1 = Range("A2:A5")  'First column data
Set xDRg2 = Range("B2:B4")  'Second column data
Set xDRg3 = Range("C2:C4")  'Third column data
xStr = "-"   'Separator
Set xRg = Range("E2")  'Output cell
For xFN1 = 1 To xDRg1.Count
    xSV1 = xDRg1.Item(xFN1).Text
    For xFN2 = 1 To xDRg2.Count
        xSV2 = xDRg2.Item(xFN2).Text
      For xFN3 = 1 To xDRg3.Count
        xSV3 = xDRg3.Item(xFN3).Text
        xRg.Value = xSV1 & xStr & xSV2 & xStr & xSV3
        Set xRg = xRg.Offset(1, 0)
       Next
    Next
Next
End Sub

3. Nato pritisnite F5 za zagon te kode in vse kombinacije treh stolpcev bodo ustvarjene hkrati, glejte posnetek zaslona:

Seznam ali generiranje vseh možnih kombinacij iz več seznamov z zmogljivo funkcijo

Če je na seznamih več vrednosti, je treba navesti možne kombinacije, morda boste težko spremenili kodo. Tu lahko priporočim močno orodje - Kutools za Excel, vsebuje priročno funkcijo Seznam vseh kombinacij ki lahko na podlagi danih seznamov podatkov hitro našteje vse možne kombinacije.

Po namestitvi Kutools za Excel, naredite tako:

1. klik Kutools > Vstavi > Seznam vseh kombinacij, glej posnetek zaslona:

2. v Seznam vseh kombinacij v pogovornem oknu izvedite postopke, kot je prikazano spodaj:

3. Nato so bile vse navedene vrednosti in ločila navedena v pogovornem oknu, glejte posnetek zaslona:

4. In nato kliknite Ok in izpiše se pozivno polje, ki vas opomni, da izberete celico za izpis rezultata, glejte posnetek zaslona:

5. Kliknite OK, so vse možne kombinacije na podlagi danih seznamov ustvarjene v delovnem listu, kot je prikazano na sliki spodaj:

Kliknite za prenos Kutools za Excel zdaj!

Več relativnih člankov: