作者：乔山办公网日期：
返回目录：excel表格制作
1. 先在选项百的公式选项卡中勾选“启用迭代计算”，确定。
2. 比如要在A列中生成，选择A1:A1000，输入公式：
=IF(OR(A1=0,A1="",COUNTIF(A$1:A$100,A1)>1,ISERROR(A1)),RANDBETWEEN(0,999),A1)
按Ctrl+回车键度，同时在A1:A1000中输入公式
3. 用条件格式问验证，选择A1:A1000，条件格式，公式：
=COUNTIF($A$1:$A$1000,A1)>1
格式：填充颜色，确定。如答有相同的，即会显示填充的颜色，重复按F9，直至没有填充颜色的单元格。
PS：因为相当于版要把0～999共1000个数随机填定到1000个单元格中，实际是很难用随机数权来实现的。
A1输入文本“随机数zd”
A2输入数组公式（数版组公式输入时按ctrl+shift+enter完成）
=SMALL(IF(COUNTIF(A$1:A1,ROW($1:$100))=0,ROW($1:$100)),ROUNDUP((101-ROW(A1))*RAND(),))
向下填充需要的行数权（最多100行）
1、利用一个辅助列zd比如C3到C12，在C3输入公式：=rand()向下拉到C12
2、然后在B3利用排序函数得到1~10的不重复数字，B3输入公式：=RANK(C3,$C$3:$C$12)
向下拉到B12。
如果你觉得C列碍眼，可以把C列隐藏，也可以先复制B列，再在B列选择性粘贴/数值/确定，就可以把C列删除了。甚至还有一个更简单的办法：专把辅助列建在其他工作表，比如在Sheet2的C3（也可以其他单元格，但后面公式要相应更改）输入公式：=rand()向下拉到C12，然属后在你的表格Sheet1的B3输入公式：=RANK(Sheet2!C3,Sheet2!$C$3:$C$12)向下拉到B12
难点在不能重知复
A2粘贴公式道
=SMALL(IF(COUNTIF(C$1:C1,ROW($1:$100)),65536,ROW($1:$100)),ROUNDUP(RAND()*(101-ROW(A1)),))
粘贴完后不要回车,按ctrl+shift+enter三键组回合结束
公式下答拉即可