EXCEL中，我想在一个单元格区域内产生N个随机数整数，这些随机整数不能重复！请问怎么做？

以下是引用 coolbi5 回答的的答案：http://zhidao.baidu.com/question/120030711.html?an=0&si=4
打开excel文档，然后按alt+f11进入vbe编辑窗口，插入模块
'然后把下面的代码复制到模块里面，然后保存，再次按alt+f11返回
'excel窗口，按alt+f8，运行suijishu宏就可以在当前表格a1-a500
'产生不重复的1-500个随机数，希望对你有用，代码已亲测通过

,----------------代码如下-------------------
Sub suijishu()
Dim t, i, sjs(500)
For t = 1 To 500
Randomize
sjs(t) = Int(500 * Rnd) + 1
For i = 1 To (t - 1)
If sjs(t) = sjs(i) Then
sjs(t) = Int(500 * Rnd) + 1
i = 0
End If
Next i
Next t
For t = 1 To 500
ActiveSheet.Range("a" & t).Value = sjs(t)
Next t
End Sub