| 查看: 4354 | 回复: 8 | ||
[求助]
急求,如何在Excel中求每60个数据的平均值 已有6人参与
|
| Excel数据处理中,有一列数据特别多,如何每60个数据求一次平均值,所有数据个数是60的整数倍,一直将所有的数据处理完,输出所得平均值。先谢谢各位了 |
» 猜你喜欢
论文终于录用啦!满足毕业条件了
已经有17人回复
不自信的我
已经有5人回复
磺酰氟产物,毕不了业了!
已经有4人回复
投稿Elsevier的杂志(返修),总是在选择OA和subscription界面被踢皮球
已经有8人回复
» 本主题相关价值贴推荐,对您同样有帮助:
excel中大量数据如何导入matlab当中?超过1000个数据无法一个一个输入
已经有14人回复
利用一个栅格数据求另外一个栅格数据的平均值?
已经有5人回复
excel有公式能打出均值±标准差吗
已经有5人回复
如何求多个excel文件里数据的平均值
已经有3人回复
平均值相同的多组数据之间如何进行显著性检验?
已经有5人回复
XPS数据导出后怎么都在EXCEL的A列,怎么回事,急求助!
已经有4人回复
如何计算LC50?平行数据取平均值怎么代入?
已经有15人回复
excel里面怎样在多年日时间序列里面统计出各年的月均值
已经有4人回复
已知几个相对独立群里的样本数,均值和标准差,怎么用excel计算它们之间的显著性?
已经有10人回复
请教:如何将Mathematic中两列矩阵数据,导入到Excel中?
已经有5人回复
求用excel处理数据的教程
已经有12人回复
EXCEL表中多对数据的相关关系如何作图?
已经有10人回复
【求助】如何用excel 2007添加图表数据误差线error bar【有效期至2011.6.30】
已经有3人回复
Excel中如何获得处理一列数据
已经有9人回复
【求助】在excel里处理一下数据求微分,请高手指教一下~谢谢啦~
已经有15人回复
【求助】excel作图复制到word中后无法看到原数据
已经有13人回复
【求助】如何导入Excel中的数据,在mathematica中生成list?
已经有3人回复
匿名
用户注销 (职业作家)
Matlab专家
- 应助: 223 (大学生)
- 金币: 2891.3
- 散金: 5302
- 红花: 59
- 沙发: 10
- 帖子: 3308
- 在线: 945小时
- 虫号: 0
- 注册: 2012-05-01
- 性别: GG
- 专业: 力学
2楼2015-01-15 15:02:56
匿名
用户注销 (职业作家)
Matlab专家
- 应助: 223 (大学生)
- 金币: 2891.3
- 散金: 5302
- 红花: 59
- 沙发: 10
- 帖子: 3308
- 在线: 945小时
- 虫号: 0
- 注册: 2012-05-01
- 性别: GG
- 专业: 力学
3楼2015-01-15 15:12:21
geyaolove8
木虫 (著名写手)
- 应助: 53 (初中生)
- 金币: 2527
- 散金: 2935
- 红花: 54
- 帖子: 2588
- 在线: 321.7小时
- 虫号: 2416371
- 注册: 2013-04-13
- 性别: GG
- 专业: 宇宙学

4楼2015-01-15 17:47:47
5楼2015-01-16 00:14:22
lrshan22
铁杆木虫 (正式写手)
- 应助: 11 (小学生)
- 金币: 5197.2
- 帖子: 344
- 在线: 168.6小时
- 虫号: 3056434
- 注册: 2014-03-15
- 性别: GG
- 专业: 岩土与基础工程
6楼2015-01-16 00:39:26
deephill
铁杆木虫 (职业作家)
- 应助: 59 (初中生)
- 金币: 5262.3
- 散金: 100
- 红花: 16
- 帖子: 4425
- 在线: 425小时
- 虫号: 305318
- 注册: 2006-12-09
- 性别: GG
- 专业: 微量元素地球化学
【答案】应助回帖
感谢参与,应助指数 +1
|
excel vba 程序如下:n,m,rowmax 自己根据数据情况设定设定 '''''------------------- Sub dafasd() Dim n, m As Integer n = 2 '''''数据存放的列数 m = 60 求取平均值的周期 或 个数 rowmax = 360 数据从第1行开始,具有的最大行数 For i = 1 To rowmax Step m ''''数据从1行开始,m个开始求均值 ''''''计算的结果放在数据列后的一列 Cells(Int(i / m) + 1, n + 1) = Application.WorksheetFunction.Average(Range(Cells(i, n).Address & ":" & Cells(i + m - 1, n).Address)) Next i End Sub '''''------------------- |
7楼2015-01-16 09:18:02
8楼2015-01-16 11:16:45
9楼2015-01-16 11:26:19







回复此楼