=combin function

[Jerry Kinder]

Hi,
I want to know the combinations of four letter that are possible from a list
( abcdefghij ) .
The =combin function will tell me how many combinations are possible.
=combin(10,4)
I want a list of all the possible combinations of 4 letters for the list.
abcd
acbd
addc .... etc.
Is there away to have excel 2000 do this??

Thank you,
Jerry

 

[JMB]

Using a macro (this will populate A1:A210 of the active sheet)

Sub test()
Dim i As Long, j As Long
Dim k As Long, l As Long
Dim Count As Long
Dim Data As Variant

Count = 0
Data = Array("a", "b", "c", _
"d", "e", "f", "g", "h", _
"i", "j")

For i = LBound(Data) To UBound(Data) - 3
For j = i + 1 To UBound(Data) - 2
For k = j + 1 To UBound(Data) - 1
For l = k + 1 To UBound(Data)
Cells(1 + Count, 1).Value = Data(i) & Data(j) _
& Data(k) & Data(l)
Count = Count + 1
Next l
Next k
Next j
Next i

End Sub

 

[Max]

You might also want to try this recent response to a similar query:
http://tinyurl.com/nbdhx
(Link to a sample file with Myrna Larson's power subroutine, ready to play)

 

[Max]

Reply from OP:
---------
From: jerrykinder ..
To: "Max" <[email protected]>
Subject: Re: =combin function
Date: Fri, 24 Feb 2006 12:50:56 -0600

Thanks, it worked perfect.
Jerry