Skip to main content

Conas gach teaglaim féideartha in Excel a liostáil nó a ghiniúint?

Ligean le rá, tá an dá cholún sonraí seo a leanas agam, agus anois, ba mhaith liom liosta de na teaglamaí uile is féidir a ghiniúint bunaithe ar an dá liosta luachanna mar a thaispeántar ar chlé. B’fhéidir, is féidir leat na teaglamaí go léir a liostáil ceann ar cheann mura bhfuil mórán luachanna ann, ach, má tá roinnt colúin le luachanna iolracha ag teastáil chun na teaglamaí féideartha a liostáil, seo roinnt cleasanna gasta a d’fhéadfadh cabhrú leat déileáil leis an bhfadhb seo in Excel .

Déan liosta nó giniúint gach teaglaim féideartha ó dhá liosta le foirmle

Déan liosta nó giniúint gach teaglaim féideartha ó thrí liosta nó níos mó le cód VBA

Déan liosta nó giniúint gach teaglaim féideartha ó iliomad liostaí le gné chumhachtach


Déan liosta nó giniúint gach teaglaim féideartha ó dhá liosta le foirmle

Is féidir leis an bhfoirmle fhada seo a leanas cabhrú leat gach teaglaim féideartha de luachanna dhá liosta a liostáil go tapa, déan mar a leanas:

1. Iontráil nó cóipeáil an fhoirmle thíos i gcill bhán, sa chás seo, cuirfidh mé isteach í i gcill D2, agus ansin brúigh Iontráil eochair chun an toradh a fháil, féach an scáileán:

=IF(ROW()-ROW($D$2)+1>COUNTA($A$2:$A$5)*COUNTA($B$2:$B$4),"",INDEX($A$2:$A$5,INT((ROW()-ROW($D$2))/COUNTA($B$2:$B$4)+1))&"-"&INDEX($B$2:$B$4,MOD(ROW()-ROW($D$2),COUNTA($B$2:$B$4))+1))

nótaí: San fhoirmle thuas, $ A $ 2: $ A $ 5 is é raon luachanna na chéad cholúin, agus $ B $ 2: $ B $ 4 is é raon luachanna an dara liosta ar mhaith leat na teaglamaí uile is féidir a liostáil, an $ D $ 2 an cill a chuir tú an fhoirmle, is féidir leat na tagairtí cille do do riachtanas a athrú.

2. Ansin roghnaigh cill D2 agus tarraing an láimhseáil líonta síos go dtí na cealla go dtí go bhfaighidh tú na cealla bána, agus tá na teaglamaí féideartha uile liostaithe bunaithe ar luachanna an dá liosta. Féach an pictiúr:


Déan liosta nó giniúint gach teaglaim féideartha ó thrí liosta nó níos mó le cód VBA

B’fhéidir go bhfuil sé deacair duit an fhoirmle thuas a chur i bhfeidhm, má tá sonraí iolracha colúin ann, beidh sé trioblóideach í a mhodhnú. Anseo, tabharfaidh mé cód VBA isteach chun déileáil leis go tapa.

1. Coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Modúil Fuinneog.

Cód VBA: Cruthaigh gach teaglaim de 3 cholún nó níos mó

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
nótaí: Sa chód thuas, A2: A5, B2: B4, C2: C4 an bhfuil an raon sonraí a theastaíonn uait a úsáid, E2 an cill aschuir is mian leat na torthaí a aimsiú. Más mian leat gach teaglaim de níos mó colún a fháil, athraigh agus cuir paraiméadair eile leis an gcód mar do riachtanas.

3. Ansin, brúigh F5 eochair chun an cód seo a rith, agus ginfear gach teaglaim de na 3 cholún ag an am céanna, féach an scáileán:


Déan liosta nó giniúint gach teaglaim féideartha ó iliomad liostaí le gné chumhachtach

Má tá liostaí iolracha ann is gá luachanna a liostáil na teaglamaí féideartha, b’fhéidir go mbeadh sé deacair duit an cód a mhodhnú. Anseo, is féidir liom uirlis chumhachtach a mholadh - Kutools le haghaidh Excel, tá gné áisiúil ann Liostaigh Gach Teaglaim ar féidir leo na teaglamaí uile is féidir a liostáil go tapa bunaithe ar liostaí sonraí tugtha.

Leideanna:Chun é seo a chur i bhfeidhm Liostaigh Gach Teaglaim gné, ar dtús, ba cheart duit an Kutools le haghaidh Excel, agus ansin an ghné a chur i bhfeidhm go tapa agus go héasca.

Tar éis a shuiteáil Kutools le haghaidh Excel, déan mar seo le do thoil:

1. cliceáil Kutools > Ionsáigh > Liostaigh Gach Teaglaim, féach ar an scáileán:

2. Sa an Liostaigh Gach Teaglaim bosca dialóige, déan na hoibríochtaí mar atá thíos an taispeána a thaispeántar:

3. Ansin tá na luachanna agus na deighilteoirí sonraithe uile liostaithe sa bhosca dialóige, féach an scáileán:

4Agus ansin cliceáil Ok cnaipe, agus popfaidh bosca pras amach le cur i gcuimhne duit cill a roghnú chun an toradh a aschur, féach an scáileán:

5. Cliceáil OK, gineadh gach ceann de na teaglamaí féideartha bunaithe ar na liostaí a tugadh isteach sa bhileog oibre mar a thaispeántar an scáileán a leanas:

Cliceáil chun Íoslódáil Kutools le haghaidh Excel Anois!


Earraí níos coibhneasta:

  • Cruthaigh Gach Comhcheangal de 3 Nó Il-Cholún
  • Ag ceapadh, tá 3 cholún sonraí agam, anois, ba mhaith liom gach teaglaim de na sonraí sna 3 cholún seo a ghiniúint nó a liostáil mar atá thíos an pictiúr a thaispeántar. An bhfuil aon mhodhanna maithe agat chun an tasc seo a réiteach in Excel?
  • Faigh Gach Teaglaim atá Comhionann le Suim tugtha
  • Mar shampla, tá an liosta uimhreacha seo a leanas agam, agus anois, ba mhaith liom a fháil amach cén teaglaim d’uimhreacha ar an liosta suim suas le 480, sa phictiúr a leanas a thaispeántar, is féidir leat a fheiceáil go bhfuil cúig ghrúpa de chomhcheangail fhéideartha ann a bhfuil cothrom leo go 480, mar shampla 300 + 60 + 120, 300 + 60 + 40 + 80, srl. An t-alt seo, labhróidh mé faoi roinnt modhanna chun a fháil amach cé na cealla arb ionann iad agus luach sonrach in Excel.
  • Gin nó Liostáil Gach Permutations Féideartha
  • Mar shampla, tá trí charachtar XYZ agam, anois, ba mhaith liom gach tréscaoilteacht féideartha a liostáil bunaithe ar na trí charachtar seo chun sé thoradh dhifriúla a fháil mar seo: XYZ, XZY, YXZ, YZX, ZXY agus ZYX. In Excel, conas a d’fhéadfá gach tréscaoilteacht a ghiniúint nó a liostáil go tapa bunaithe ar líon difriúil carachtar?
  • Cruthaigh Liosta de na Teaglaim 4 Digití Féideartha go léir
  • I roinnt cásanna, b’fhéidir go mbeidh orainn liosta a ghiniúint de na teaglamaí 4 dhigit uile is féidir de uimhir 0 go 9, rud a chiallaíonn liosta de 0000, 0001, 0002… 9999 a ghiniúint. Chun tasc an liosta in Excel a réiteach go tapa, tugaim roinnt cleasanna isteach duit.

 

Uirlisí Táirgiúlachta Oifige is Fearr

🤖 Kutools AI Aide: anailís sonraí a réabhlóidiú bunaithe ar: Forghníomhú Chliste   |  Gin Cód  |  Cruthaigh Foirmlí Saincheaptha  |  Anailís a dhéanamh ar Sonraí agus Cairteacha a Ghin  |  Feidhmeanna Kutools a agairt...
Gnéithe Coitianta: Faigh, Aibhsigh nó Aithnigh Dúblaigh   |  Scrios Sraitheanna Bána   |  Comhcheangail Colúin nó Cealla gan Sonraí a Chailleadh   |   Babhta gan Foirmle ...
Cuardaigh Super: Ilchritéir VLookup    VLookup Illuachanna  |   VLookup Trasna Ilbhileoga   |   Amharc doiléir ....
Liosta anuas Casta: Go tapa Cruthaigh Liosta Anuas   |  Liosta anuas Cleithiúnach   |  Liosta Buail Isteach Ilroghnacha ....
Bainisteoir Colún: Cuir Líon Sonrach Colún leis  |  Colúin Bog  |  Scoránaigh Stádas Infheictheachta na gColún Ceilte  |  Déan comparáid idir Raonta & Colúin ...
Gnéithe Réadmhaoin: Fócas Eangaí   |  Amharc Dearaidh   |   Barra Mór na Foirmle    Leabhar Oibre & Bainisteoir Bileog   |  Leabharlann Acmhainní (Uaththéacs)   |  Piocálaí Dáta   |  Comhcheangail Bileoga Oibre   |  Criptigh/Díchriptigh Cealla    Seol Ríomhphost trí Liosta   |  Scagaire Super   |   Scagaire Speisialta (scagaire trom/iodálach/stailc tríd...) ...
Barr 15 Uirlisí12 Téacs uirlisí (Cuir Téacs, Bain Carachtair,...)   |   50 + Cairt cineálacha (Cairt Gantt,...)   |   40+ Praiticiúil Foirmlí (Ríomh aois bunaithe ar lá breithe,...)   |   19 Insertion uirlisí (Cuir isteach Cód QR, Ionsáigh Pictiúr ón gCosán,...)   |   12 Tiontú uirlisí (Uimhreacha le Focail, Comhshó Airgeadra,...)   |   7 Cumaisc & Scoilt uirlisí (Sraitheanna Comhcheangail Casta, Cealla Scoilt,...)   |   ... agus eile

Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am.  Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...

Tuairisc


Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!

 

Comments (42)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
como que poderia gerar uma lista de combinações de nomes no LibreOffice?
Rated 5 out of 5
This comment was minimized by the moderator on the site
Hello, Johansson

Sorry, the methods in this article are only applied for Microsoft Excel.
Thank you!
This comment was minimized by the moderator on the site
Hej alle sammen

Jeg håber at i kan hjælpe med dette.

Jeg har en af de gamle Bastalåse kodelåse med 6 knapper, hvor man kan trykke knapperne ind, lade dem være i neutral eller trække dem ud.

Låsen var åben da jeg købte den, så jeg låste den i håb om at jeg kunne gå kombinationerne igennem.

Men jeg har lidt problemer med at få nedskrevet samtlige kombinationer (729 så vidt jeg kan regne ud).

Er der en der vil hjælpe mig med med dette? Evt. kan man kalde de 3 indstillingsmuligheder pr. knap for: 1-2-3, 1-0-2, eller I-N-U (ind-neutral-ud).


Krydser finger og siger på forhånd mange tak hvis jeg kan få låsen op, det er sådan lidt nostalgi.

Mvh

Nicolaj
This comment was minimized by the moderator on the site
No 1º Exemplo de captura de tela , está faltando em All combinations Jan - KTE
This comment was minimized by the moderator on the site
Hello friend,
How are you. Thank you for your notice. We changed the first ficture. Please check now. Have a nice day.

Sincerely,
Mandy
This comment was minimized by the moderator on the site
Hi,
I have a project with excel (including Kutools) that I am stuck on.
Can anyone tell me how to get a list of all combinations of 6 different numbers, without repeating any of the numbers?
I know there should be 6! = 720 combinations but I need the list.
Thanks
This comment was minimized by the moderator on the site
Hi,
I have a project with excel (including Kutools) that I am stuck on.
Can anyone tell me how to get a list of all combinations of 6 different numbers, without repeating any digit?
I know there should be 6! = 720 combinations but I need the list.
Thanks
This comment was minimized by the moderator on the site
Hello Extend Office,
I want to extend the VBA code in "List Or Generate All Possible Combinations From Three Or More Lists With VBA Code article"
I want to show only the one's whose total of the combinations is equal to 9. Can you please show the additional extension/lines in the code? sorry, I'm barely new in VBA.
For example, I only want to show the combinations like the following:
1-2-2-2-2 (this is equal to 1+2+2+2+2 = 9) so, it will show the ones whose total is 9, the rest won't show.
1-2-3-1-3 (=9)
1-3-2-1-2 (=9) and so on...

Thanks very much for your help
Dalesimplest.becky15.08.21

This comment was minimized by the moderator on the site
edited formula to randomize 5 columns instead of 3 but still wont work,why?
Sub ListAllCombinations()
'Updateby Extendoffice
Dim xDRg1, xDRg2, xDRg3, xDRg4, xDRg5 As Range
Dim xRg As Range
Dim xStr As String
Dim xFN1, xFN2, xFN3, xFN4, xF5 As Integer
Dim xSV1, xSV2, xSV3, xSV4, xSV5 As String
Set xDRg1 = Range("A2:A10") 'First column data
Set xDRg2 = Range("B2:B10") 'Second column data
Set xDRg3 = Range("C2:C10") 'Third column data
Set xDRg2 = Range("D2:D10") 'Fourth column data
Set xDRg3 = Range("E2:E10") 'Fifth column data
xStr = "," 'Separator
Set xRg = Range("G2") '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
For xFN4 = 1 To xDRg4.Count
xSV4 = xDRg4.Item(xFN4).Text
For xFN5 = 1 To xDRg5.Count
xSV5 = xDRg5.Item(xFN5).Text
xRg.Value = xSV1 & xStr & xSV2 & xStr & xSV3 & xStr & xSV4 & xStr & xSV5
Set xRg = xRg.Offset(1, 0)
Next
Next
Next
End Sub
This comment was minimized by the moderator on the site
Hello, jericho,You should modify your code as below code, please try it, thank you!<div data-tag="code">Sub ListAllCombinations()
'Updateby Extendoffice
Dim xDRg1, xDRg2, xDRg3, xDRg4, xDRg5 As Range
Dim xRg As Range
Dim xStr As String
Dim xFN1, xFN2, xFN3, xFN4, xFN5 As Integer
Dim xSV1, xSV2, xSV3, xSV4, xSV5 As String
Set xDRg1 = Range("A2:A10") 'First column data
Set xDRg2 = Range("B2:B10") 'Second column data
Set xDRg3 = Range("C2:C10") 'Third column data
Set xDRg4 = Range("D2:D10") 'Fourth column data
Set xDRg5 = Range("E2:E10") 'Fifth column data
xStr = "-" 'Separator
Set xRg = Range("H2") '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
For xFN4 = 1 To xDRg4.Count
xSV4 = xDRg4.Item(xFN4).Text
For xFN5 = 1 To xDRg5.Count
xSV5 = xDRg5.Item(xFN5).Text
xRg.Value = xSV1 & xStr & xSV2 & xStr & xSV3 & xStr & xSV4 & xStr & xSV5
Set xRg = xRg.Offset(1, 0)
Next
Next
Next
Next
Next
End Sub
This comment was minimized by the moderator on the site
How to remove the repetition if I have color 1, color 2, color 3 in different orders(i.e. color2, color 3, color 1) but they are the same for my need? tks!
This comment was minimized by the moderator on the site
Excelentes soluciones, muchas gracias, lo logré con Kutools
This comment was minimized by the moderator on the site
NON FUNZIONA. HO SEGUITO GLI STESSI PASSAGGI MA MI DICE CHE C'E' UN ERRORE
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations