Excel 中如何产生随机汉字

Excel 中如何产生随机汉字,第1张

电脑还没有那么智能,想要什么汉字就出来什么,估计还得些年!

估计你要的是记忆式键入,即先前在某个单元格输入的内容,Excel能自己记忆,下次只需敲出前一两个字,就会自动出现可供选择的词条,以快速的编辑表格。若不能记忆键入,可检查选项中的记忆式键入项是否打勾。

 

二个办法:

1、找网上字典,在一个列中粘贴N个不同的汉子,用VLOOKUP、OFFSET配合DANDBETWEEN随机函数即可

2、直接用CHAR配合DANDBETWEEN随机函数即可,但是前提是你要知道一部分汉子的代码区域

Randomize

字数 = 5

For 字数

随机字1 = Chr(Int((- 10254 + 20319 + 1) Rnd - 20319))

Do While 随机字1=""

随机字1 = Chr(Int((-10254+20319+1)Rnd-20319))

Loop

随机字=随机字&随机字1

Next

TracePrint 随机字

'text1和text2设置成多行加垂直滚动条。

Private Sub Command1_Click()

Dim myInput As String, myOutput As String, myTemp As String, i As Integer, j As Integer

myInput = Text1Text

Do Until myInput = ""

Randomize (Timer)

For j = 1 To Val(Text3Text)

i = Int(Len(myInput) Rnd) + 1

If myInput <> "" Then

myTemp = Mid(myInput, i, 1)

myOutput = myOutput & myTemp

myInput = Replace(myInput, myTemp, "")

Else

Exit For

End If

Next

myOutput = myOutput & vbCrLf

Loop

Text2Text = myOutput

End Sub

可以使用RANDBETWEEN 函数和CHOOSE函数生成指定范围的随机数。

RANDBETWEEN() :随机生成指定范围的数值

CHOOSE() :  从指定范围中返回一个值

语法:RANDBETWEEN(最小值,最大值)

CHOOSE(索引,值)

示例     =CHOOSE(RANDBETWEEN(1,3),"皮鞋","运动鞋","高跟鞋")

公式 :随机生成从指定的范围(皮鞋、高跟鞋、运动鞋)任意一个值

以上就是关于Excel 中如何产生随机汉字全部的内容,包括:Excel 中如何产生随机汉字、在EXCEL表格里如何生成随机文字(字数3-5个字)、按键精灵如何输出随机几个汉字等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址:https://www.54852.com/zz/10120202.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-05
下一篇2023-05-05

发表评论

登录后才能评论

评论列表(0条)

    保存