Como calcular logaritmos em vba (com exemplos)
Você pode usar a seguinte sintaxe para calcular o log (base 10) de um valor usando VBA:
Function FindLog(number) FindLog = Application.WorksheetFunction.Log(number) End Function
E você pode usar a seguinte sintaxe para calcular o logaritmo natural de um valor usando VBA:
Function FindNaturalLog(number) FindNaturalLog = Log(number) End Function
Os exemplos a seguir mostram como usar cada função na prática.
Exemplo 1: Calcular log (Base 10) usando VBA
Para calcular o log (base 10) de um valor no Excel, usar-se-ia a função LOG da seguinte forma:
Isso nos diz que o log de 5 é 0,69879 .
Para replicar esta funcionalidade em VBA, podemos definir a seguinte função:
Function FindLog(number) FindLog = Application.WorksheetFunction.Log(number) End Function
Podemos então digitar esta função na célula B2 para calcular o log do valor na célula B1 :
Isso nos diz que o log de 5 é 0,69879 .
Corresponde ao valor calculado pela função LOG do Excel.
Exemplo 2: Calcular log natural usando VBA
Para calcular o logaritmo natural de um valor no Excel, usaríamos a função LN da seguinte forma:
Isso nos diz que o logaritmo natural de 5 é 1,609438 .
Para replicar esta funcionalidade em VBA, podemos definir a seguinte função:
Function FindNaturalLog(number) FindNaturalLog = Log(number) End Function
Podemos então digitar esta função na célula B2 para calcular o logaritmo natural do valor na célula B1 :
Isso nos diz que o log de 5 é 1,609438 .
Corresponde ao valor calculado pela função LN do Excel.
Recursos adicionais
Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:
VBA: Como escrever funções AVERAGEIF e AVERAGEIFS
VBA: Como escrever funções SUMIF e SUMIFS
VBA: Como escrever funções COUNTIF e COUNTIFS