Excel 查找范围中三个最小值的平均值-意外编译错误

Excel 查找范围中三个最小值的平均值-意外编译错误,excel,vba,Excel,Vba,我试图找到一个范围内三个最小值的平均值。为此,我将平均函数和小函数结合起来,如下所示 我的尝试基于oz论坛帖子的第4条回复,(),但不断得到一个编译错误,突出显示了“:”在A2和A10之间,我定义了我的范围 dim threeminavr AS single threeminavr = WorksheetFunction.Average(Small(A2:A10,1), Small(A2:A10,2), Small(A2:A10,3)) 有什么想法吗?您尝试使用SMALL,就像工作表中用作工

我试图找到一个范围内三个最小值的平均值。为此,我将平均函数和小函数结合起来,如下所示

我的尝试基于oz论坛帖子的第4条回复,(),但不断得到一个编译错误,突出显示了“:”在A2和A10之间,我定义了我的范围

dim threeminavr AS single

threeminavr = WorksheetFunction.Average(Small(A2:A10,1), Small(A2:A10,2), Small(A2:A10,3))

有什么想法吗?

您尝试使用SMALL,就像工作表中用作工作表函数时一样

threeminavr = WorksheetFunction.Average(WorksheetFunction.Small(range("A2:A10"), 1), _
                                        WorksheetFunction.Small(range("A2:A10"), 2), _
                                        WorksheetFunction.Small(range("A2:A10"), 3))

哎呀!谢谢你的回复。工作如期进行。