excel VBA编程“ThisWorkbook.Sheets(1).Range("ax66")调试不对

来源:百度知道 编辑:UC知道 时间:2024/06/19 13:39:30
全部语句是“ThisWorkbook.Sheets(1).Range("ax66")=ThisWorkbook.Application.WorksheetFunction.Average(Worksheets(1).Range("ax4:ax65"))”我本意是想让这个语句等号右边的“ax4:ax65”所包括的数值作平均值后,将其结果赋给等号左边的“ax66”格中,怎么行不通啊,请各位大虾指点迷津^_^

你搞复杂了,调用内置函数直接用“Application.函数”就可以了。改为
ThisWorkbook.Sheets(1).Range("ax66") = Application.Average(Worksheets(1).Range("ax4:ax65"))

你搞复杂了,调用内置函数直接用“Application.函数”就可以了。改为
ThisWorkbook.Sheets(1).Range("ax66") = Application.Average(Worksheets(1).Range("ax4:ax65"))
555~~~

555~~~~~