作者：乔山办公网日期：
返回目录：excel表格制作
在EXCEL中利用copyROUNDUP函数可以随机生成几个数，且这几个数的和等于指定的一个数。演示软件版本excel2007，演示为随机生成5个数，和为100。具体操作请参照以下步骤。
1、在C5单元格内输入公式“=ROUNDUP(RAND()*2*(100-SUM($E$1:E1))/(11-ROW(E1)),1)”生成第一个随机百数。度最后一个数字“1”代表为有效数字位，可以根据个人需要需要修改。
2、然后按下回车键，表格中就会出现第一个随机数。
3、点击C5右下角的黑点，鼠标变成十字形，拖往C8单元格，这样就填充了C5到C8单元格，这里就生成了4个随机数。
4、然后在C9表格中输入命令【=100-SUM(C5:C8)】，生成最后一个随机数。
5、完成以上设置后，即可在exce中随机生成几个数，且这几个数的和等于指定的一个数。
文件已发到你邮箱。我QQ尾号9394
首先调出定义名称对话框，快捷键Ctrl+F3，输入一个名称，在来引用位置处输入=GET.WORKBOOK(1)，并点击确定。双击一个单元格输入=INDEX(ShName,ROW(A1))，INDEX(数组,第二参数)表示从数组中提取第几个元素，下拉公式就可以看到顺序返回了所有工自作表名称，这样就可以在其他函数中引用了。
Ctrl+F3调出定义名称对话框，或者点击【公式】-【定义名称】调出定义名称对话框。
在【名称】框里输入一个定义名称(本例输入ShName)，方便在工作表中引用。在【引用位置】处输入=GET.WORKBOOK(1)，设置完毕后点击【确定】按钮。
双击一个单元zhidao格，输入公式：=INDEX(ShName,ROW(A1))，这时就返回了包括工作簿名称的工作表名称。
由于提问中没有说明20个数的特征，这里就先设定抄为100以内正整数，百
算出答案这个说法中也没有说明是哪种运算，这里设定为求和。
代码如下度：
Sub RamSum()
Dim rng As Range
Set rng = Range("A1:A20")
rng.Formula = "=INT(RAND()*100)"
rng = rng.Value
Range("B1") = Application.WorksheetFunction.Sum(rng)
Set rng = Nothing
End Sub