excel vba代码大全求助

来源：蜘蛛抓取(WebSpider) 时间：2017-03-02 00:57 标签： excel vba例子源代码
查看: 5334|回复: 3
[已解决]求教各位老师：VBA求一列中N个数据的平均值，代码怎么写？
本帖最后由 zt20j 于
19:36 编辑
求教各位老师：VBA求一列中N个数据的平均值，代码怎么写？我写的代码如下，但是计算结果不正确，求教！
Public Sub sste()
'计算样本平均值
& && & Worksheets(&数据&).Cells(23, 14).Value = WorksheetFunction.Average(Worksheets(&数据&).Cells(8, 3), _
& && & Worksheets(&数据&).Cells(Rows.Count, 3).End(xlUp).Row)
wp8680发布于
Public Sub sste()
'计算样本平均值
& && & Worksheets(&数据&).Cells(23, 14).Value = WorksheetFunction.Average(range(Worksheets(&数据&).Cells(8, 3), _
& && & Worksheets(&数据&).Cells(Rows.Count, 3).End(xlUp)))
你这个还是调用了工作表函数，不可取。再者你的引用范围写错了。我仅手工帮你改下，没有进行测试。
&&&本楼为最佳答案&&&
Public Sub sste()
'计算样本平均值
& && & Worksheets(&数据&).Cells(23, 14).Value = WorksheetFunction.Average(range(Worksheets(&数据&).Cells(8, 3), _
& && & Worksheets(&数据&).Cells(Rows.Count, 3).End(xlUp)))
你这个还是调用了工作表函数，不可取。再者你的引用范围写错了。我仅手工帮你改下，没有进行测试。
谢谢wp8680老师，问题已解决。
本帖最后由 zt20j 于
19:37 编辑
谢谢wp8680老师，问题已解决。
你好！我想要降序排列后的前90%的平均分。请教如何写代码
Powered by扫码下载APP
随时选购服务
需求发布后1小时内收到服务商响应每个需求平均有10个服务商参与95%以上的需求得到了圆满解决所有需求不向雇主收取任何佣金好的包装增加视觉销售力
需求几个EXCEL的VBA代码
需求几个EXCEL的VBA代码
雇主预算：￥50.00
已收到 5 个服务商的文案稿件
， 最终中标并完成需求
有相似问题想解决?专业顾问来帮助您
01发布需求, 托管赏金02服务商交稿03雇主选稿04中标公示05验收并付款06评价
完成手机认证,保证能随时联系到服务商
参与需求，开始赚钱
第1步：提交您的稿件
第2步：中标后交付作品
第3步：获得赏金
加入猪八戒，共享万亿服务市场
该需求下的优秀交稿
TA的交稿：
可以做&QQ&淘宝案例&
TA的交稿：
可以搞定QQ
TA的交稿：
100元。联系qq&
TA的交稿：
qq：请发给我一份简单的测试表，我先做出来给你看。这个网站的新手很难接到任务，只有通过先做的方式了。
交易成功的需求
兼职相关需求
&!&在线客服的工作时间为周一至周五 9:00-18:00&&版主: , , , , , , ,
1.&&求助时，建议上传已压缩的Excel文档。
2.&&如果因他人帮助解决了问题，建议楼主设置最佳答案。详见。
3.&&问题解决后，建议楼主为已解决。
4.&&为方便解答，请，并具体说明。详见。
5.&&非技术问题请在聊天室发帖。详见。
1 / 1533 页
- [阅读权限 1]
1 / 1533 页
Powered by

我要回帖

更多关于 excel vba例子源代码 的文章

 

随机推荐