excel 排列组合函数

发布网友 发布时间：2022-04-21 15:37

我来回答

共3个回答

热心网友 时间：2023-07-09 22:50

从0到9十个数任意组合用vba
Sub 组合()
Application.ScreenUpdating = False
x = 1
For i = 9 To 3 Step -1
For j = i - 1 To 2 Step -1
For k = j - 1 To 1 Step -1
For n = k - 1 To 0 Step -1
Cells(x, 1).Value = i & j & k & n
x = x + 1
Next n
Next k
Next j
Next i
Application.ScreenUpdating = True
End Sub
右键工作表标签，把代码复制进去，按F5运行程序，你会看见结果会显示在a列中
9876
9875
9874
9873
9872
9871
9870
9865
9864
9863
9862
9861
9860
9854
9853
9852
9851
9850
9843
9842
9841
9840
9832
9831
9830
9821
9820
9810
9765
9764
9763
9762
9761
9760
9754
9753
9752
9751
9750
9743
9742
9741
9740
9732
9731
9730
9721
9720
9710
9654
9653
9652
9651
9650
9643
9642
9641
9640
9632
9631
9630
9621
9620
9610
9543
9542
9541
9540
9532
9531
9530
9521
9520
9510
9432
9431
9430
9421
9420
9410
9321
9320
9310
9210
8765
8764
8763
8762
8761
8760
8754
8753
8752
8751
8750
8743
8742
8741
8740
8732
8731
8730
8721
8720
8710
8654
8653
8652
8651
8650
8643
8642
8641
8640
8632
8631
8630
8621
8620
8610
8543
8542
8541
8540
8532
8531
8530
8521
8520
8510
8432
8431
8430
8421
8420
8410
8321
8320
8310
8210
7654
7653
7652
7651
7650
7643
7642
7641
7640
7632
7631
7630
7621
7620
7610
7543
7542
7541
7540
7532
7531
7530
7521
7520
7510
7432
7431
7430
7421
7420
7410
7321
7320
7310
7210
6543
6542
6541
6540
6532
6531
6530
6521
6520
6510
6432
6431
6430
6421
6420
6410
6321
6320
6310
6210
5432
5431
5430
5421
5420
5410
5321
5320
5310
5210
4321
4320
4310
4210
3210

热心网友 时间：2023-07-09 22:50

根据题意就是要从A，B，C三个组中分别取一个，然后按照从A中取的排在第一位，从C中取的排在最后一位；因此完成这件事需分三步：从A中取一个排在第一位有4种方法；再从B中取一个排在第二位也有4种方法；最后从C中取一个排在第三位有4种方法；根据分步计数原理知共有
4*4*4=64种不同的结果。
如果所取出的三个元素可以安排在不同位置上的话，那么就有4*4*4*6=384种不同的结果。

热心网友 时间：2023-07-09 22:50

=INT(RAND()*10000)

用这个公式