excel函数中,11-23,31-43,51-63,81-93,一共52个数字随机分布在A1-A52的单元格里,不重复数字的函

52个数字为一组,一共要10组,全是这52个数字随机随机分布排列在A1-A52,B1-B52,C1-C52……谢谢

1. 在选项中勾选“启用迭代计算”,并把最大循环迭代次数设置到1000以上后确定。

2. 选择A1,输入公式:

=IF(OR(A1="",A1=0,A1=ROW($24:$30),A1=ROW($44:$50),A1=ROW($64:$80),COUNTIF(A$1:A$52,A1)>1),RANDBETWEEN(11,93),A1)

同时按Ctrl+Shift+Enter三键输入数组公式,向下拖拉复制公式到A52中得到52个不重复数。

3. B1:B52、C1:C52一样输入,OK。


图中,E、F、G列中分别对A、B、C列各单元格的数字在该列出现的数次,可以看出均为1次。

温馨提示:答案为网友推荐,仅供参考
第1个回答  2015-10-07

  看下面制作的动画,我使用了excel的填充和排序功能做的,填充数值时要按住ctrl键填充序列数值,rand函数是随机排序的好函数,它的小数位数为8位数,对于52个的数值,排序绝对不会重复,只要照着这个做10组就可以了,当然VBA也可完成,不过能简化就不用复杂的方式来解决问题。

点击查看



第2个回答  2015-10-06
每列得到不重复的52个数,A1公式:
=INDEX({11;12;13;14;15;16;17;18;19;20;21;22;23;31;32;33;34;35;36;37;38;39;40;41;42;43;51;52;53;54;55;56;57;58;59;60;61;62;63;81;82;83;84;85;86;87;88;89;90;91;92;93},IF(ROW(A1)=1,RANDBETWEEN(1,52),SMALL(IF(COUNTIF(OFFSET(A$1,,,MAX(ROW(A1))-1,),{11;12;13;14;15;16;17;18;19;20;21;22;23;31;32;33;34;35;36;37;38;39;40;41;42;43;51;52;53;54;55;56;57;58;59;60;61;62;63;81;82;83;84;85;86;87;88;89;90;91;92;93})=0,ROW($1:$52),0),RANDBETWEEN(ROW(A1),52))))
数组公式,按CTRL+SHIFT+回车,右拉,下拉52行。追问

可惜不能采纳3个人,不好意思,谢谢

追答

用一个数组公式,随机生成你要求的52个不重复数字,只要右拉、下拉就可以;
能解决问题就好。

第3个回答  2015-10-06
在A1:A52中分别输入11-23,31-43,51-63,81-93,一共52个数字
在B1中输入或复制粘贴下列公式
=RAND()
下拉填充或双击B1右下角的小黑方块(填充柄)
选择B列任一非空单元格 (一次或多次)单击常用工具栏上的升序排序或降序排序
A列中的结果就是随机排列且不重复的追问

但是这样只有1组啊,我试过用这个方法放到第二组,就不行,第一组也会变啊

哈,这个方法行了

谢谢

真是可惜,不能同时采纳两个人

追答

选择B列任一非空单元格 (一次或多次)单击常用工具栏上的升序排序或降序排序

选择A1:A52 复制
右键单击任一单元格 选择性粘贴 数值 确定

追问

我知道,我是等第一个回答的家伙补充,因为他只是简单说说,我看不懂他发那个文件,他要是不回复,我就采纳你

本回答被提问者采纳
第4个回答  2015-10-06

需要利用VBA自定义函数,见附件所示。

追问

请问为什么看不到?

请问你发给我的文件怎样操作?

为什么看不到数字,全是英文?

追答

哦,操作需要选中52个单元格按ctrl+shift+enter输入,如图所示

然后其中的getRandList函数是VBA自定义函数,你需要把代码拷贝到你的工作表中再使用

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网