=combin function
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
"Jerry Kinder" wrote:
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
|