如何用隨機問題函式解決重新整理問題

由於問題中沒有解釋 20 個數字的特徵，我們先將其設定為 100 以內的正整數，計算答案的語句沒有具體說明它是什麼型別的運算，而是設定為求和。

** 如下：sub ramsum（）。

dim rng as range

set rng = range("a1:a20")= "=int(rand()*100)"

rng =range("b1") =

set rng = nothing

end sub

乙個表格中有三個工作簿？

根據你的陳述，乙個工作簿中應該有三個工作表，隨機函式會改變，你可以乙個乙個地列印，列印乙份，雙擊乙個單元格。

它也可以直接使用 VBA 實現。

我用隨機函式刷了一下，必須先有選擇地貼上，否則不開啟資料就會發生變化，可以用VBA解決。

您可以不使用重新整理按鈕。

使用快捷鍵 - 直接 F9

按一次，它將重新整理一次。

鍵盤上的現成按鈕：F9。 可用於重新整理隨機資料！

按 F9 鍵完成資料重新整理。

按一次可重新整理一次。

通常，我們在生成隨機試驗資料時使用 rand 函式。

蘭德函式，也稱為隨機數函式，導致小數點後 0-1。

呼叫格式：=rand（）。

擴充套件1：如果要生成任意範圍的數字，可以做一些操作並完成它。

例如，如果生成乙個從 1 到 100 的隨機數，則呼叫格式為 =rand（）*100 擴充套件 2：

上面的值包括 1 到 100 之間的任何值。 通常，我們使用整數，因此我們需要將它們與整數函式一起使用。

例如，=int（rand（）*100） 表示生成乙個從 1 到 100 的整數。

你是否要求這5個數字同時滿足，前乙個加到下乙個不是負數，減法不是負數？ 這兩個條件不能同時滿足！

因為你要求這5個數字中必須有2個負數，所以當減法不是負數時，兩個負數必須彼此相鄰（負數-正數=負數）和最後兩位數字，但這樣加法就不滿足了（負數+負數=負數）。

但是如果要滿足加法不是負數，那麼兩個負數不能緊挨著，但減法不是負數（負數 - 正數 = 負數）。

所以你只能分別滿足這兩個條件，這可以通過函式或VBA來實現。

這可以通過 VBA 程式設計來實現。

用 rnd（） 生成乙個隨機數。

Excel選項---公式---選中“自動重新計算”。

親愛的，對隨機數沒有要求嗎？ 例如，介於 20 和 80 之間; 之間; 小數點後一位為......2 位數字如果你真的不要求它，那麼無論如何，d5 輸入： =rand（）e5 輸入：

min（$d$5：d5）+rand（）*20-min（$d$5：d5）），將公式拉到 h5

按 f9 重新整理，都是真的隨機，最大值不會減少到最小值超過 20。

使用 VBA。 生成合格的隨機數後，填寫單元格。

在 excel2003 中，[選項] [重新計算] 將“自動重新計算”更改為“手動重新計算”。

excel2010，類似。

去試一試吧！

選擇所有資料區域單元格，右鍵單擊，複製，保持選擇不變，右鍵單擊，貼上特殊內容，值，就可以開始了。

我想我只能按照我在樓上說的去做。