Как посчитать логарифмы в vba (с примерами)


Вы можете использовать следующий синтаксис для расчета журнала (по основанию 10) значения с помощью VBA:

 Function FindLog(number)
FindLog = Application.WorksheetFunction.Log(number)
End Function

И вы можете использовать следующий синтаксис для вычисления натурального логарифма значения с помощью VBA:

 Function FindNaturalLog(number)
FindNaturalLog = Log(number)
End Function

Следующие примеры показывают, как использовать каждую функцию на практике.

Пример 1. Расчет журнала (по основанию 10) с использованием VBA

Чтобы вычислить журнал (по основанию 10) значения в Excel, можно использовать функцию LOG следующим образом:

Это говорит нам о том, что журнал 5 равен 0,69879 .

Чтобы воспроизвести эту функциональность в VBA, мы можем определить следующую функцию:

 Function FindLog(number)
FindLog = Application.WorksheetFunction.Log(number)
End Function

Затем мы можем ввести эту функцию в ячейку B2 , чтобы вычислить журнал значения в ячейке B1 :

Это говорит нам о том, что журнал 5 равен 0,69879 .

Это соответствует значению, рассчитанному с помощью функции ЖУРНАЛ в Excel.

Пример 2. Вычисление естественного журнала с помощью VBA

Чтобы вычислить натуральный логарифм значения в Excel, мы будем использовать функцию LN следующим образом:

Это говорит нам о том, что натуральный логарифм числа 5 равен 1,609438 .

Чтобы воспроизвести эту функциональность в VBA, мы можем определить следующую функцию:

 Function FindNaturalLog(number)
FindNaturalLog = Log(number)
End Function

Затем мы можем ввести эту функцию в ячейку B2 , чтобы вычислить натуральный логарифм значения в ячейке B1 :

естественный журнал в VBA

Это говорит нам о том, что журнал 5 равен 1,609438 .

Это соответствует значению, рассчитанному функцией LN в Excel.

Дополнительные ресурсы

В следующих руководствах объясняется, как выполнять другие распространенные задачи в VBA:

VBA: как написать функции СРЗНАЧЕСЛИ и СРЗНАЧЕСЛИФС
VBA: как писать функции СУММЕСЛИ и СУММЕСЛИ
VBA: как писать функции COUNTIF и COUNTIFS

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *