1、VBA方法
如下宏可在光标位置生成随机数1-10之间的随机数。
Sub Rand()
Selection.TypeText 1 +Int(Rnd() * 9)
Selection.TypeParagraph
End Sub
2、Excel中生成复制
采用excel中生成后复制粘贴word的方法。
excel生成随机数的函数基本上有两个:
rand()*a+b,生成范围为b-a到b+a。
randbetween(a,b),要求a,b为整数,可生成范围为a到b之间的整数。
Sub doit()
Selection.TypeText Round(Rnd() * 0.4 - 0.2, 4) '生成小于0.2但大于或等于-0.2的值,4位小数
Selection.TypeParagraph
End Sub
直接插入就OK啦吧