WorksheetFunction.Average (Excel)
Returns the average (arithmetic mean) of the arguments.
Arguments can either be numbers or names, arrays, or references that contain numbers. Logical values and text representations of numbers that you type directly into the list of arguments are counted. If an array or reference argument contains text, logical values, or empty cells, those values are ignored; however, cells with the value zero are included. Arguments that are error values or text that cannot be translated into numbers cause errors. If you want to include logical values and text representations of numbers in a reference as part of the calculation, use the AVERAGEA function.
Average (Arg1, Arg2, ..., Arg30)
Dim dblAverage As Double
dblAverage = WorksheetFunction.Average(Arg1:=)