1、选择A1:A24单元格，输入=RAND() 按Ctrl+Enter组合键结束
2、选择B1:B24单元格，输入=A1/SUM(A$1:A$24)*25559 按Ctrl+Enter组合键结束，得到总和为25559的24个随机数。
温馨提示：答案为网友推荐，仅供参考
第1个回答 2020-04-28
1、首先打开电脑上的EXCEL表格，然后在一列数据中统计大于等于6的数的个数。
2、然后在表格中输入=，接着在=后面，输入函数countif。
3、输入完成后，使用鼠标双击该函数。
4、然后选择所统计的范围，选择完范围之后，接着在输入,”>=6”。
5、输入完成后，键盘上按回车后输出结果，就完成了。
第2个回答 推荐于2017-11-26
规划求解,可解决你的难题..参数自己修改一下.
第3个回答 2013-01-01
写了一段VBA，你可试一下
Private Sub CommandButton1_Click()
Dim mSum%, mAr(1 To 24) As Integer, i%, Tmp%, tSum%, mMin%, mMax%, mgr$
mgr = InputBox("输入要分解的数，随机数下限，随机数上限，中间用空格隔开")
mSum = Split(mgr, " ")(0)
mMin = Split(mgr, " ")(1)
mMax = Split(mgr, " ")(2)
For i = 1 To 23
Do
DoEvents
Randomize
Tmp = Int(Rnd * (mMax - mMin + 1) + mMin)
Loop While WorksheetFunction.sum(mAr) + Tmp > mSum
mAr(i) = Tmp
Next i
mAr(24) = mSum - WorksheetFunction.sum(mAr)
[a1:a24] = WorksheetFunction.Transpose(mAr)
End Sub本回答被网友采纳
Private Sub CommandButton1_Click()
Dim mSum%, mAr(1 To 24) As Integer, i%, Tmp%, tSum%, mMin%, mMax%, mgr$
mgr = InputBox("输入要分解的数，随机数下限，随机数上限，中间用空格隔开")
mSum = Split(mgr, " ")(0)
mMin = Split(mgr, " ")(1)
mMax = Split(mgr, " ")(2)
For i = 1 To 23
Do
DoEvents
Randomize
Tmp = Int(Rnd * (mMax - mMin + 1) + mMin)
Loop While WorksheetFunction.sum(mAr) + Tmp > mSum
mAr(i) = Tmp
Next i
mAr(24) = mSum - WorksheetFunction.sum(mAr)
[a1:a24] = WorksheetFunction.Transpose(mAr)
End Sub本回答被网友采纳
第4个回答 2013-01-01
如果没有特殊要求的话，用rand()生成23个随机数，最后一个数=25559-sum()