WorksheetFunction.GeoMean (Excel)
Devuelve la media geométrica de una matriz o de un rango de datos positivos. Por ejemplo, puede usar GEOMEAN para calcular la tasa de crecimiento promedio dado un interés compuesto con tasas variables.
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 alguno de los puntos de datos es menor o igual que 0, GEOMEAN devuelve el #NUM! valor de error. La ecuación de la media geométrica es: The equation for the geometric mean is:
GeoMean (Arg1, Arg2, ..., Arg30)
Dim dblGeoMean As Double
dblGeoMean = WorksheetFunction.GeoMean(Arg1:=)