创建按指定条件组合数字的自定义函数

WYS67

yjh_27 发表于 2019-2-25 11:45
'mode=1: 不考虑顺序不可重复(组合)：C(n,m)=n!/m!(n-m)!
'mode=2: 不考虑顺序且可重复（可重复组合）： ...

如A:E列：选定A5:F30000，输入区域数组公式 {  =CQXHZH(C1,C2,1)或=CQXHZH(11,5,1)   对于这种多列显示的组合号码，可以省略第三参数“1”，
如G列：选定G5:=G30000，输入区域数组公式 {  =CQXHZH(G1,G2,2)或=CQXHZH(11,5,2)    如果单列显示组合号码，则必须输入第三参数“2”
老师：从29楼截图可以看出，虽然A:E列每行的5个号码都不会重复出现，但任何一列的最小值都可能为01，最大值都可能为11，其组合注数用函数公式=COMBIN($F$1,$F$2)得出的结果肯定不正确！好像您30楼列出的两种方法【从小到大或从大到小】都无法囊括其组合总数。您看应该怎样编写代码，才能正确显示所有的号码组合？

WYS67

yjh_27 发表于 2019-2-25 11:45
'mode=1: 不考虑顺序不可重复(组合)：C(n,m)=n!/m!(n-m)!
'mode=2: 不考虑顺序且可重复（可重复组合）： ...

恳请老师编写自定义函数。

yjh_27

WYS67 发表于 2019-2-25 15:51
恳请老师编写自定义函数。

arr = ArrPC(n, m,3 , , 1)
调用时，按需求写不同的数字

WYS67

yjh_27 发表于 2019-2-25 20:42
arr = ArrPC(n, m,3 , , 1)
调用时，按需求写不同的数字

玉阳山人

老师：在LTXZH里修改arr = ArrPC(n, m, , , 1)为  arr = ArrPC(n, m,3 , , 1)后
在A5:F30000里输入公式 =CQXHZH(C1,C2,3,,1)，显示#VALUE!错误！

恳请老师写出完整的代码。

WYS67

yjh_27 发表于 2019-2-25 20:42
arr = ArrPC(n, m,3 , , 1)
调用时，按需求写不同的数字

老师：跪求这个自定义函数。

WYS67

yjh_27 发表于 2019-2-25 20:42
arr = ArrPC(n, m,3 , , 1)
调用时，按需求写不同的数字

老师：直到刚才，我才弄明白，这个自定义函数的难写之处。如11选5，如果按出球先后顺序排列，应该有=combin(11,5)*fact(5)=55440注。也就是11^5=161051减去有重复的105611注才能得出正确结果。弱弱问一句，能否按1楼的要求和显示格式编写11选5全排列的自定义函数？

yjh_27

WYS67 发表于 2019-2-26 18:12
老师：直到刚才，我才弄明白，这个自定义函数的难写之处。如11选5，如果按出球先后顺序排列，应该有=comb ...

11选5全排列，这是排列。11选11才是全排列。
11选5排列，33L改代码。
如不行，则上传出错附件。

WYS67

yjh_27 发表于 2019-2-26 18:48
11选5全排列，这是排列。11选11才是全排列。
11选5排列，33L改代码。
如不行，则上传出错附件。

对不起，老师，出错的附件已删，找不回来了。
指定范围内数字、位数的排列 组合.zip (808.02 KB, 下载次数: 6)

2019-2-26 19:20 上传

点击文件名下载附件

yjh_27

WYS67 发表于 2019-2-26 19:21
对不起，老师，出错的附件已删，找不回来了。

参见附件。已改为排列。你可以给自定义函数重新命名。