在EXCEL中可以随机产生八位数吗?数字和英文混合的.

2024-11-16 14:47:50
推荐回答(3个)
回答1:

上面那位的做法很好,不用编程。如果你嫌没有小写字母,在把小写字母也写在B列的字母Z的后面,然后将公式里的37改为62,就可以了。

若嫌麻烦,用以下办法:
在A1中输入公式(全部是英文格式下的):
=CHAR(RAND()*75+48)&CHAR(RAND()*75+48)&CHAR(RAND()*75+48)&CHAR(RAND()*75+48)&CHAR(RAND()*75+48)&CHAR(RAND()*75+48)&CHAR(RAND()*75+48)&CHAR(RAND()*75+48)

copy这个公式到A1:A5000,即可。
缺点是有可能会出现几个符号。

回答2:

在EXCEL中如何使用随机函数生成8位数字或者数字与字母混合的密码,首尾可以为数字0:数字密码
=TEXT(INT(RAND()*100000000),"00000000")

混合密码
b1至b36依次填充0-9,A-Z
a1=INDEX(B:B,RAND()*37)&INDEX(B:B,RAND()*37)&INDEX(B:B,RAND()*37)&INDEX(B:B,RAND()*37)&INDEX(B:B,RAND()*37)&INDEX(B:B,RAND()*37)&INDEX(B:B,RAND()*37)&INDEX(B:B,RAND()*37)

如不满意,按F9重算。

回答3:

VBA代码如下,按alt+F11,在sheet1中双击,粘贴。工具 宏 运行宏。执行aaa即可。Sub aaa()
For i = 1 To 5000
bb = ""
aa = ""
For j = 1 To 8
a = VBA.Int(Rnd() * 3 + 1)
Select Case a
Case Is = 1
bb = Chr(64 + Int(Rnd * 26) + 1)
Case Is = 2
bb = Chr(96 + Int(Rnd * 26) + 1)
Case Is = 3
bb = Int(Rnd() * 9 + 1)
End Select
aa = aa & bb
Cells(i, 1) = aa
Next j
Next i
End Sub