33问答网
所有问题
当前搜索:
vba不重复随机数抽奖用
如何用viusal basic抽
随机数
1-26,不可以
重复
答:
要最少有两个
随机数
同时出现才行,程式码是: Dim a b As Integer---定义a b为整数 Private Sub Command1_Click Randomize---用上面的公式时要打此字,不可打Randomise a=Int(Rnd*26)+1 b=Int(Rnd*26)+1 Text1.Text=a---把a的值显示在Text1上 Text2.Text=b---把b的值显示在Text...
如何利用
VBA
生成一列
不重复
的
随机
整数
答:
如果我们要用
VBA
生成一列不重复的随机整数,可以用下面的VBA代码。本例可以在A1:A100中产生1-100的
不重复随机
整数。Sub RndNumberNoRepeat()Dim TempArr1(99) As Integer, TempArr2(0 To 99, 1 To 1) As Integer Dim RndNumber As Integer, i As Integer Randomize (Timer) ‘初始化
随机数
生...
vba
ppt中抽取
随机数
怎样改才不会出现
重复数
,求大神帮忙
答:
1、用数组存放抽取的题目 a(1)、a(2)...2、用条件循环控制,抽取题目时(比如第4题),和已抽取题目1-3比较,如果不相等,就是第4题;如果相等,此题不要,产生下一个
随机数
,再抽,直到不相等才为第4题。
VBA
生成
不重复
的
随机数
答:
随机函数rand(),既然说是随机了,就比较难以受人控制。如果硬要,要么是手动筛选,要么就是
使用vba
来实现自动筛选了。不过一般来说,如果
随机数
取的不多的情况下,是不大可能出现
重复
的。
...如何在
VBA中
从1,2,3。。。24这24个数值数据中
随机
抽取3个
不重复
的值...
答:
Sub choose()Dim a as Long, b as Long, c as Long 1: Randomize a=Int(24*Rnd+1)b=Int(24*Rnd+1)c=Int(24*Rnd+1)If a=b or b=c or a=c then Goto 1 Else MsgBox "抽取的
随机数
为:" & a & "、" & b & "、" & c, VbInformation, "随机数"End If End Sub ...
excel中的自动抽签
vba
的问题
答:
用
VBA
很容易完成,产生的
随机数
放在A1单元格:Private Sub CommandButton1_Click()Dim flag As Boolean, iNum As Integer Do iNum = Application.WorksheetFunction.RandBetween(1, 50)flag = False If iNum >= 20 And iNum <= 25 Then flag = True End If Loop While flag = True Cells(1, 1...
该如何让
随机数不重复
!!!我想不到了?
答:
Random需要一个种子, 如果没给用预设的, 因为每次都一样, 所以一定会按照相同顺序, 每次开启都一致.常见做法就是将时间当作种子, 每次运行的时间都不会一样, 自然就不会
重复
了.
VBA
产生
不重复
的
随机数
问题
答:
不过你需要一个随即种子,否则每次开始运行的随机结果会相同的。判断如果重复了就自动再次生成。。不过感觉这个效率不是很高,因为不停的要判断重复。所以效率很定低下。你可以一次产生1-10000之内的
随机数字
1000个。这样再从中去处
不重复
的10个,然后根据对应关系再影射到100-300之间,应该就很好了。
...10中
随机
抽取3个数字,
不重复
。请指教,麻烦说得详细一点,
答:
=int(rand()*10)
怎么用
VBA
制作
随机数
?
答:
1、生成第一个
随机数
。在E2单元格内输入公式“=ROUNDUP(RAND()*2*(100-SUM($E$1:E1))/(11-ROW(E1)),1)”生成第一个随机数。2、调整有效数字位数。下图红框中的数字控制着随机数有效数字位数,如果想保留三位有效数字,将其改成3即可。3、拉伸填充E2到E10。点击E2右下角的黑点,鼠标变成...
1
2
3
4
5
6
7
8
9
10
涓嬩竴椤
灏鹃〉
其他人还搜
vba产生不重复整数随机数
随机生成1到100不重复随机数
Excel中vba不重复随机数
vb生成不重复的随机数
vba随机不重复
不重复随机数
自动生成多个不重复的随机数
不重复随机数生成器excel
vba产生不同的10个随机数