使用Excel如何產生隨機數字給室友

如何室友excel隨機產生數字 145切不重複本人不太會excel需學

Sub CreateRND()

Dim arr() As Integer '定義陣列

ReDim arr(range(＂d3＂).Value） '更改陣列大小

Dim min As Integer '定義隨機數的最小值

Dim max As Integer '定義隨機數的最大值

Dim flag As Boolean '定義標誌變量，用來判斷是否有重複值

max = range(＂d2＂).Value '將d2單元格的數值賦值給最大值

min = range(＂d1＂).Value '將d1單元格的數值賦值給最小值

If (max - min 1

Exit Sub

End If

Randomize (Now（)） '用當前時間產生隨機數種子

For i = 0 To range(＂d3＂).Value '迴圈產生隨機數

Do

arr(i) = Rnd() * (max - min) min '產生隨機數字

flag = False

For j = 0 To (i - 1) '循環判斷目前的隨機數是否和前面產生的隨機數相同，如果相同就重新產生

If (arr(i) = arr(j)) Then

flag = True

End If

Next

Loop While flag

Next

Columns(＂A:A＂).ClearContents

range(＂a1＂).Resize(range(＂d3＂).Value) = Application.Transpose(arr) '輸出結果

End Sub

如何使excel產生一個範圍內的隨機數字

1.首先計算這個範圍的差值。這裡假設範圍值為50~100之內的隨機數

#2.開啟電子表格，在所需產隨機數的儲存格內輸入下列公式：=rand()*(100-50) 50。按下確認鍵就可以產生在規定範圍內的隨機數了！

#3.如果你需要產生多個隨機數，那拖曳單元格最下角小三角就可以啦！

#Microsoft Excel是微軟公司的辦公室軟體Microsoft office的元件之一，是由Microsoft為Windows和Apple Macintosh作業系統的電腦而編寫和運行的試算表軟體，最早版本是在1985年開發的。

Microsoft Excel可以進行各種資料的處理、統計分析和輔助決策操作等，具有開啟或關閉表格標題行、計算列使用單一公式調整每一行、資料排序和篩選、自訂公式和文字輸入等功能。目前，Microsoft Excel被廣泛應用於管理、統計財經、金融等眾多領域。

以上是使用Excel如何產生隨機數字給室友的詳細內容。更多資訊請關注PHP中文網其他相關文章！