Cum se generează toate combinațiile de 3 sau mai multe coloane în Excel?
Presupunând că am 3 coloane de date, acum vreau să generez sau să listez toate combinațiile de date din aceste 3 coloane așa cum este prezentat mai jos. Aveți vreo metodă bună pentru rezolvarea acestei sarcini î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. Vă rugăm să faceți clic pe o celulă în care să obțineți rezultatul, apoi copiați și lipiț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 este oarecum dificilă de utilizat, dacă există mai multe coloane pe care trebuie să le folosească datele, 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, vă rugăm să modificați și să adăugați alți parametri la cod, după cum doriți.
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.
După instalare Kutools pentru Excel, vă rugăm să faceți acest lucru:
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:
Faceți clic pentru a descărca Kutools pentru Excel și încercare gratuită acum!
Cele mai bune instrumente de productivitate Office
Kutools pentru Excel vă rezolvă majoritatea problemelor și vă crește productivitatea cu 80%
- Super Formula Bar (editați cu ușurință mai multe linii de text și formulă); Layout de citire (citiți și editați cu ușurință un număr mare de celule); Lipiți la interval filtrat...
- Merge celule / rânduri / coloane și păstrarea datelor; Conținut de celule divizate; Combinați rânduri duplicate și sumă / medie... Prevenirea celulelor duplicate; Comparați gamele...
- Selectați Duplicat sau Unic Rânduri; Selectați Rânduri goale (toate celulele sunt goale); Super Find și Fuzzy Find în multe cărți de lucru; Selectare aleatorie ...
- Copie exactă Mai multe celule fără modificarea referinței formulelor; Creați automat referințe la foi multiple; Introduceți gloanțe, Casete de selectare și multe altele ...
- Formule favorite și inserare rapidă, Gama, Diagrame și Imagini; Criptați celulele cu parola; Creați o listă de corespondență și trimiteți e-mailuri ...
- Extrageți textul, Adăugați text, eliminați după poziție, Eliminați spațiul; Creați și imprimați subtotaluri de paginare; Convertiți conținutul dintre celule și comentarii...
- Super Filtru (salvați și aplicați scheme de filtrare altor foi); Sortare avansată după lună / săptămână / zi, frecvență și multe altele; Filtru special cu bold, italic ...
- Combinați cărți de lucru și foi de lucru; Merge Tables pe baza coloanelor cheie; Împărțiți datele în mai multe foi; Conversia în loturi xls, xlsx și PDF...
- Gruparea tabelului pivot după numărul săptămânii, ziua săptămânii și multe altele ... Afișați celulele deblocate, blocate prin diferite culori; Evidențiați celulele care au formulă / nume...
- 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!
