作业帮 > 综合 > 作业

怎样用函数填充由n个数组合所有m个数的所有数组相加的公式

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/25 00:45:54
怎样用函数填充由n个数组合所有m个数的所有数组相加的公式
在A1:J1的10个单元格编辑所有3个或4个数相加的公式,平时手工在单元格编辑公式是=A1+B1+C1,=A1+B1+D1..=A1+B1+J1,=B1+C1+D1,=B1+C1+E1...=B1+C1+J1.=H1+I1+J1.这样是把10个数组合所有3个数相加的公式都编辑出来,如果数据多更浪费时间,请问怎样用函数填充公式,如果做一个数字表格多次用填充柄填充也可以或增加辅助列,具体要怎样操作.
不是很明白你最终想要什么结果
假设目前数据是A1:J1
在C2处输入=$A1+$B1+C1,然后将该公式拖到J2
得出的分别是=A1+B1+C1,=A1+B1+D1.=A1+B1+J1的结果
其他的可以类推..
再问: 你好确实是要这样的公式。我目前编辑的公式是要在14个数中编辑所有2,3.,.14个数相加的公式总的一万三千多个公式,这样是比全部输入更快,但是公式实在太多这样右拉,预计每天用3个小时左右在5个月左右编辑完,高手有没有更好的办法啊!
再答: 但有个问题,就是你这样是需要填充满整个EXCEL?我是觉得这样子满满的结果根本不知道哪个格是哪些数相加的和,那你是想要怎样的展示结果呢? 可以用vba代码实现吗?这样相对简单,但我能力有限,试了下14个数的循环运行效率很低,但是可以算出结果的。 这里给你个=A1+B1+C1,=A1+B1+D1.......=A1+B1+J1的代码,都加上注释,如果想算别的可以自己修改一下 Sub mn() 'i和ch是固定的,为了输出而定义 Dim i As Integer Dim ch As Integer i = 2 ch = 64 '这里你想统计多少个数相加就增加多少个n几 Dim n1 As Integer Dim n2 As Integer Dim n3 As Integer '这里的5就是你有多少个数,如果你是14个就改成14 For n1 = 1 To 14 For n2 = 1 To 14 For n3 = 1 To 14 '此处保证输出的结果唯一 If n1 > n2 Then If n2 > n3 Then '注意,下面每列只允许一个输出 '在第一列第二行开始显示相加的单元格 Cells(i, 1) = Chr(ch + n3) & Chr(ch + n2) & Chr(ch + n1) '在第二列第二行开始输出对应的公式 Cells(i, 2) = "=" & Chr(ch + n3) & "1+" & Chr(ch + n2) & "1+" & Chr(ch + n1) & "1" '在第三列第二行开始直接输出对应的值 Cells(i, 3) = Cells(1, n3) + Cells(1, n2) + Cells(1, n1) 'i是用来输出换行用的 i = i + 1 '对应上面有几个if就有几个end if End If End If '对应上面有几个for就有几个next Next Next Next MsgBox "!!!Finish!!!" End Sub
再问: 不管能不能实现已经非常感谢您了,你已用了不少时间。我VBA是一窍不通但也可以依葫芦画瓢,请问刚开始输入的步骤和要在哪里输入,结束后公式会自动显示在什么地方,要不要先点在那个指定的单元格,还是程序已经固定公式显示在什么地方了期待回复不胜感激!!我的QQ1551047636相识是缘
再答: 你数据保证在第一行,从第一格开始连续输入,如 A1 A2 A3 A4 A5 1 2 3 4 5 然后ALT+F11,在弹出的窗体左边双击你的sheet(假如是sheet1)会弹出一个代码框,将Sub mn()到End Sub的内容(包括这两行)复制到框内,粘贴完后就关掉,回到excel后,ALT+F8,此时会看到一个sheet1.mn的宏,选中单击左边执行即可。 运行结果是从A2,B2,C2开始往下输出的 至于代码的修改,你可以粘贴后,留意绿色文字的说明,绿色文字是不运行的。