WorksheetFunction.HarMean (Excel)
Retorna a média harmônica de um conjunto de dados. A média harmônica é a recíproca da média aritmética das recíprocas.
A média harmônica sempre será menor que a média geométrica, que sempre será menor que a média aritmética. Os argumentos podem ser números, ou nomes, matrizes ou referências que contenham números. Os valores lógicos e as representações de números por extenso que você digita diretamente na lista de argumentos são contados. Se uma matriz ou argumento de referência contiver texto, valores lógicos ou células vazias, estes valores serão ignorados; no entanto, células com valor zero serão incluídas. Os argumentos que são valores de erro ou texto e que não podem ser convertidos em números geram erros. Se qualquer ponto de dados ≤ 0, média. harmônica retorna o #NUM! valor de erro. A equação para a média harmônica é
HarMean (Arg1, Arg2, ..., Arg30)
Dim dblHarMean As Double
dblHarMean = WorksheetFunction.HarMean(Arg1:=)