一个数组写进arr()后想对其中的一部分求averge,怎么用? [推广有奖]

0关注
1粉丝

本科生

83%

还不是VIP/贵宾

威望: 0 级
论坛币: 0 个
通用积分: 0
学术水平: 5 点
热心指数: 5 点
信用等级: 4 点
经验: 971 点
帖子: 134
精华: 0
在线时间: 86 小时
注册时间: 2010-8-19
最后登录: 2011-5-12

楼主

南阳黄汉升 发表于 2011-1-30 01:22:58 |AI写论文

是否 +2 论坛币

k人参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

数组如下, 不打算写累加(sum=sum+arr())的方法,想直接用worksheetfunction.averge和stdev求其arr(5)到arr(13)之间数组的均值和标准差

3
4
5
6
8
9
5
3
4
11
13
17
2
9
8
5
7

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：averge AVE ARR Ver worksheet ARR averge

回帖推荐

spider127 发表于2楼查看完整内容

不知道，除非你再设一个只含第5 到13个的新数组，然后放进Application.Average()里。不然直接算比较方便如：Range("A5").Activate （假设A5为第5个数据的地址） m = Application.Average(Range(ActiveCell.Cells(1, 1), ActiveCell.Cells(9, 1))) （9=13-5+1） MsgBox m 或者干脆直接引入数据地址： m = Application.Average(Range(Range("A5"), Range("A13"))) MsgBox m

本帖被以下文库推荐

· 计量.统计精彩问答|主题: 12506, 订阅: 52

沙发

spider127

发表于 2011-1-30 09:43:17

不知道，除非你再设一个只含第5 到13个的新数组，然后放进Application.Average()里。不然直接算比较方便
如：Range("A5").Activate （假设A5为第5个数据的地址）
      m = Application.Average(Range(ActiveCell.Cells(1, 1), ActiveCell.Cells(9, 1)))  （9=13-5+1）
      MsgBox m
或者干脆直接引入数据地址：
      m = Application.Average(Range(Range("A5"), Range("A13")))
      MsgBox m