魔方吧·中文魔方俱乐部

标题: EXCEL函数问题 [打印本页]

作者: 第8个小笼包 时间: 2010-10-16 16:30:45 标题: EXCEL函数问题

能不能用excel实现1~8个数不重复地任取4个的一个随机排列？
例如：第一次产生2147，按回车后，自动变成另一个，如：3726

作者: 战斗机 时间: 2010-10-16 16:46:44

能……我不会所以不解释

作者: 宇枫幽蓝 时间: 2010-10-16 16:48:09

可以，要涉及宏。到我没学过宏，等高手解释。

作者: 太阳人 时间: 2010-10-16 17:00:07

用普通函数或自定义函数都可以，不过有点烦。。。建议楼主到专业EXCEL论坛请教。。。

[ 本帖最后由太阳人于 2010-10-16 17:07 编辑 ]

作者: gb57 时间: 2010-10-16 17:31:31

这个非常简单，我刚用excel时想生成一注双色球，就是用的这个办法，先弄个辅助列，
a1到a8 =rand() , 找b1格写 =rank(a1,$a1

a8) ,往下拉到b4 ，点F9随机一次

作者: TanLaiChen 时间: 2010-10-16 17:39:17

什么意思，怎么我看不懂。。。

作者: 太阳人 时间: 2010-10-16 17:41:41

话说我自从某天写了一个300多M大，使用了700多万个“＝”的超大表格之后，就下决心学习了自定义函数，现在我只要复杂少少的问题就会习惯性的自定义函数。。。

作者: kattokid 时间: 2010-10-16 18:52:00

编程高手应该能解决吧？不知道与编程是否有关

作者: 第8个小笼包 时间: 2010-10-16 21:33:00 标题: 回复 5# 的帖子

不错，不失为一种办法，因为没有取整，所以任取的数相同的可能性非常之小。

作者: lulijie 时间: 2010-10-16 22:06:55

格子内容
C1    =12345678
C2    =INT(8*RAND())+1
D2    =INT(7*RAND())+1
E2    =INT(6*RAND())+1
F2    =INT(5*RAND())+1
D1    =REPLACE(C1,C2,1,)
            复制D1的公式到E1，F1
            即E1=REPLACE(D1,D2,1,)
               F1=REPLACE(E1,E2,1,)
C3    =MID(C1,C2,1)
            复制C3的公式到D3，E3，F3
            即D3    =MID(D1,D2,1)
               E3    =MID(E1,E2,1)
               F3    =MID(F1,F2,1)
每刷新一下电子表（比如改变一下任意一个其他格子的内容就可），C3、D3、E3、F3四个格子构成的4位数就是楼主所求的。

作者: 谢老师 时间: 2010-10-17 18:39:26

EXCEL函数超级强大，我们只接触了很少一部分啊！

作者: Paracel_007 时间: 2010-10-17 18:41:40

编程不是一个复杂的问题。。。但是excel我不会。。。

欢迎光临魔方吧·中文魔方俱乐部 (http://bbs.mf8-china.com/)