Excel如何在数据范围生成多个随机不重复的数字，下面就介绍一下
材料/工具
excel2010
方法
打开excel
按Alt + F11启动VBA
选择要生成随机数的工作表。
输入以下代码：
Sub m()
Range("A:A").ClearContents'
For i = 1 To 10'
kkk:
Randomize
x = Int(Rnd * 10) + 1
If Application.CountIf(Range("A:A"), x) = 0 Then
Cells(i, 1) = x
Else
GoTo kkk
End If
Next i
End Sub
按F5，就能得到随机不重复数据
版权声明：本文内容由互联网用户自发贡献，该文观点仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容， 请发送邮件至 951076433@qq.com 举报，一经查实，本站将立刻删除。如若转载，请注明出处：https://www.xiaomafuwu.com/239877.html
