Cum se generează toate combinațiile de 3 sau mai multe coloane în Excel?
Să presupunem că am 3 coloane de date și vreau să generez sau să listez toate combinațiile de date din aceste 3 coloane, așa cum se arată mai jos. Aveți metode bune pentru a rezolva această sarcină în Excel?
Generați toate combinațiile pe baza a 3 coloane de date utilizând o formulă
Generați toate combinațiile pe baza a 3 sau mai multe coloane de date utilizând codul VBA
Generați toate combinațiile pe baza a 3 coloane de date utilizând o formulă
Următoarea formulă lungă poate ajuta la listarea tuturor combinațiilor de 3 coloane, vă rugăm să faceți acest lucru:
1. Faceți clic pe o celulă în care doriți să scoateți rezultatul, apoi copiați și inserați formula de mai jos în ea:
notițe: În această formulă: A2: A4, B2: B6, C2: C5 sunt intervalele de date pe care doriți să le utilizați.
2. Apoi, trageți mânerul de umplere în jos până la celule până când sunt afișate celulele goale, ceea ce înseamnă că toate combinațiile celor 3 coloane au fost listate, a se vedea captura de ecran:
Generați toate combinațiile pe baza a 3 sau mai multe coloane de date utilizând codul VBA
Formula lungă de mai sus poate fi oarecum dificil de utilizat, dacă sunt necesare date de mai multe coloane, va fi dificil de modificat. Aici, voi introduce un cod VBA pentru a face față rapid.
1. Țineți apăsat butonul ALT + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. Clic Insera > Moduleși lipiți următorul cod în fereastra modulului.
Cod VBA: generați toate combinațiile de 3 sau mai multe coloane
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:A4") 'First column data
Set xDRg2 = Range("B2:B6") 'Second column data
Set xDRg3 = Range("C2:C5") '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
notițe: În codul de mai sus, A2: A4, B2: B6, C2: C5 sunt intervalul de date pe care doriți să îl utilizați, E2 este celula de ieșire pe care doriți să localizați rezultatele. Dacă doriți să obțineți toate combinațiile de mai multe coloane, modificați și adăugați alți parametri la cod după cum este necesar.
3. Apoi, apăsați F5 tasta pentru a rula acest cod și toate combinațiile celor 3 sau mai multe coloane vor fi generate simultan, vezi captura de ecran:
Generați toate combinațiile pe baza a 3 sau mai multe coloane de date utilizând o caracteristică minunată
Dacă aveţi Kutools pentru Excel, cu puterea sa Enumerați toate combinațiile caracteristică, puteți lista rapid și ușor toate combinațiile de coloane multiple.
1. Clic Kutools > Insera > Enumerați toate combinațiile, vezi captura de ecran:
2. În Enumerați toate combinațiile caseta de dialog, specificați datele coloanelor și separatoarele pentru listarea combinațiilor după cum se arată în următoarea captură de ecran:
3. După setarea datelor și a separatorului, faceți clic pe Ok , în următoarea casetă de prompt, selectați o celulă pentru a localiza rezultatul, vedeți captura de ecran:
4. Apoi, faceți clic OK buton, toate combinațiile au fost generate imediat după cum se arată în imaginea de mai jos:
Kutools pentru Excel - Supercharge Excel cu peste 300 de instrumente esențiale. Bucurați-vă de funcțiile AI gratuite permanent! Ia-L Acum
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!