मूल्यों या श्रेणी के सेट के लिए संयोजन की सभी संभावनाएं कैसे उत्पन्न करें?

Question

नीचे सवाल और जवाब का संदर्भ, 0-6 संख्याओं के सभी संभावित 3 अंकों के संयोजन को कैसे उत्पन्न करें

मेरे पास समान मामला है (सभी संभावित संयोजनों को उत्पन्न करने की आवश्यकता है) लेकिन नीचे तालिका में जैसे मानों के सेट के लिए, कुल संभावनाएं 1680% संयोजन होंगी

A   B   C   D   E
54  23  43  1   1
21  45  433 5   51
25  65  456 3   3
65  66  5678    100 5
12  77  980 5   6
13  90  878 6   66
111 909 662 50  55

कॉम्बिनेशन लगेगा

A   B   C   D   E
54  23  43  1   1
54  23  43  1   51
54  23  43  1   3
54  23  43  1   5
54  23  43  1   6
54  23  43  1   66
54  23  43  1   55
54  23  43  5   1
54  23  43  5   51
54  23  43  5   3
54  23  43  5   5
54  23  43  5   6
54  23  43  5   66
54  23  43  5   55

…               
…               
111 909 662 50  55

मैन्युअल रूप से यह हमेशा के लिए और स्पष्ट रूप से बोल लेगा, मैं एक्सेल में विशेषज्ञ नहीं हूं। क्रिप्या मेरि सहायता करे।

Comments

क्या आप स्पष्ट कर सकते हैं कि आपको 16807 कैसे मिले? C (35,5) 324632 है।

— XOR LX

यह आपसे कैसे अलग है पिछला सवाल ?

— Kyle

Answer 1

इस लघु मैक्रो को चलाना:

Sub Combin()
    Dim i As Long, j As Long, k As Long, l As Long
    Dim nRow As Long
    nRow = 1
    With Sheets("Sheet1")
    For i = 1 To 7
      ii = .Cells(i, "A").Value
      For j = 1 To 7
        jj = .Cells(j, "B").Value
        For k = 1 To 7
          kk = .Cells(k, "C").Value
          For l = 1 To 7
            ll = .Cells(l, "D").Value
            Sheets("Sheet2").Cells(nRow, "A").Value = ii
            Sheets("Sheet2").Cells(nRow, "B").Value = jj
            Sheets("Sheet2").Cells(nRow, "C").Value = kk
            Sheets("Sheet2").Cells(nRow, "D").Value = ll
            nRow = nRow + 1
          Next l
        Next k
      Next j
    Next i
    End With
End Sub

पर डेटा ले जाएगा पत्रक 1 पसंद:

और जैसे डेटा का उत्पादन:

पर Sheet2 सबके लिए 2401 संयोजन।