文档详情

EXCEL排列组合1.doc

发布:2017-02-02约4.48千字共6页下载文档
文本预览下载声明
EXCEL排列组合1,2,3,4这四个数字,任选组成8位数,一共有几种,EXCEL怎么自动生成? 2012-12-28 13:53 ybb9903 | 分类:办公软件 | 浏览168次那怎么排除比如1,1,1,1,1,1,1,1,或2,2,2,2,2,2,2.2,或,连续两个或两个以上相同号在一起的那种,怎么办。我也不希望,1和4排在一起,有没有办法。 提问者采纳 2012-12-28 14:18 在任意单元格输入: =MOD(INT((ROW(A1)-1)/4^(8-COLUMN(A1))),4)+1 然后,横拉8的单元格。再下拉就好了。 一共有4的8次方,即65536组数据。 追问 高手,那怎么排除比如1,1,1,1,1,1,1,1,或2,2,2,2,2,2,2.2,或,连续两个或两个以上相同号在一起的那种,怎么办。我也不希望,1和4排在一起,有没有办法。(也就是不重复排列) 回答 不重复排列的话,用公式貌似做不出来。用vba可以实现。但我没用过那个,不知道怎么写。 或者你可以使用筛选的方式,将不重复的筛选出来。 设你的数据是从a1开始的,在i1输入: =if(or(a1=b1,b1=c1,c1=d1,d1=e1,e1=f1,f1=g1,g1=h1),该行数据有重复,if(or(and(a1=1,b1=4),and(a1=4,b1=1),and(b1=1,c1=4),and(b1=4,c1=1),and(c1=1,d1=4),and(c1=4,d1=1),and(d1=1,e1=4),and(d1=4,e1=1),and(e1=1,f1=4),and(e1=4,f1=1),and(f1=1,g1=4),and(f1=4,g1=1),and(g1=1,h1=4),and(g1=4,h1=1)),该行数据有1、4连号,)) 下拉填充后,对i列进行筛选就好了。 请问,在Excel中怎么操作可以排列出由0,1,2,3,4,5,6,7,8,9,组成的10位数的排列组合啊?10个数字的全排列共有10!=3628800个,组合就只有C(10,10)=1个。 如果要全部组合(就是从1位到10位都做组合),就有2^10-1=1023个结果。 由于组合没有顺序之分,所以可以人为地给出1个顺序,例如,要求第5个组合,我们先给10个数编号,号码分别为1~A,得到是1个2位数的组合,按编排是13;同理,第6个组合是123,......第1023个组合为123456789A。计算方法如下: 先将序号转换为2进制值,5的2进制值是101,从最高位起,位值为1的,用位的序号作为编号取代位值;位值为0的放弃。101第1位和第3位是1,其余是0,用位序号取代得到的编号组合就是13;同理,6的2进制值为110,取代结果就是12;1023的2进制值为1111111111,取代结果就是123456789A。 用宏处理比较简单,先做一个自定义函数Z(n,x),计算第n个组合的2进制值,返回其第x位,再用循环过程,计算x=1~10时,f=Z(n,x)*x的值,将非0的f值合并即可。 全排列和选排列用循环语句可以实现,但意义似乎不大。 用excel在15个设定的数中,产生6个数字一组的随机排列组合 2009-06-28 16:03 又生活笑猪 | 分类:办公软件 | 浏览3504次 用excel在已设的15个数中 产生6个数字一组的随机排列组合,请教高手怎么做? 比如:2,5,8,9,13,16,18,19,20,21,22,25,27,29,31,这15个数中产生任意6个数为一组的排列组合,有多少种可能. 不要出现这样的可能:2 ,9,13,18,25,29和25,9,18,13,29,2和29,25,18,13,9,2等等这些从大到小排列是一样的要去掉. 或者别的有没有什么软件可以做? 谢谢了,我在网上怎么也找不到答案,是不是有难度? 对不起,我没有积分 提问者采纳 2009-06-29 10:56 /questionhtml 看看这个类似的,我稍微给你改了下语句~~ 打开一个EXCEL 按ALT+F11 组合键,打开VBA编辑器,选择这个表的名字,插入-模块。双击插入的模块。在出现的文本框中输入以下语句,然后关闭 Function ABC(arr As Range, num As Integer) R = arr.Rows.Count For C1 = 1 To R For C2 = C1 + 1 To R For C3 = C2 + 1 To R For C4 = C3 + 1 To R For C5 = C4 + 1 To R For C6 = C5 + 1 To R rr = rr + 1 ABC = arr(C1, 1)
显示全部
相似文档