Excel的排列组合问题

Question

有四个字母，分别是a,b,c,d
我想实现这四个字母的全部排列组合（4*3*2=24个组合）
从abcd,abdc,acbd,acdb,....一直到dcba共24个组合
想在Excel 第一行从让A1=A,B1=B,C1=C,D1=D
然后让EXCEL直接用公式在下面显示从abcd,abdc,acbd,acdb,....一直到dcba共24个组合

请教高人，如何实现？

谢谢！

Answer 1

第一步、alt+F11进入VBA编辑器。
第二部、双击sheet1，在右侧的代码区粘贴下面的代码。运行。

Sub a()
n = 1
m = 1
For i = 1 To 4
For j = 1 To 4
If i <> j Then
For k = 1 To 4
If j <> k And i <> j And k <> j And k <> i Then
For l = 1 To 4
If j <> k And i <> j And k <> j And k <> i And l <> j And l <> k And l <> i Then
Cells(m, 1) = Chr(i + 64)
Cells(m, 2) = Chr(j + 64)
Cells(m, 3) = Chr(k + 64)
Cells(m, 4) = Chr(l + 64)
m = m + 1

End If
Next
End If
Next
End If
Next
Next
End Sub

Answer 2

你的问题真是复杂哦!公式可能办不到哦!