WorksheetFunction.Average (Excel)
Devuelve el promedio (media aritmética) de los argumentos.
Los argumentos pueden ser números o nombres, matrices o referencias que contienen números. Se cuentan los valores lógicos y las representaciones textuales de números escritos directamente en la lista de argumentos. Si un argumento de matriz o referencia contiene texto, valores lógicos o celdas vacías, esos valores se pasan por alto; sin embargo, se incluyen las celdas que tengan el valor cero. Los argumentos que son valores de error o texto que no se puede convertir en números pueden producir errores. Si desea incluir valores lógicos y representaciones textuales de números en una referencia como parte del cálculo, utilice la función AVERAGEA.
Average (Arg1, Arg2, ..., Arg30)
Dim dblAverage As Double
dblAverage = WorksheetFunction.Average(Arg1:=)