Vba'da logaritma nasıl hesaplanır (örneklerle)

VBA kullanarak bir değerin günlüğünü (10 tabanı) hesaplamak için aşağıdaki sözdizimini kullanabilirsiniz:

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

VBA’yı kullanarak bir değerin doğal logaritmasını hesaplamak için aşağıdaki sözdizimini kullanabilirsiniz:

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

Aşağıdaki örnekler her bir fonksiyonun pratikte nasıl kullanılacağını göstermektedir.

Örnek 1: VBA Kullanarak Günlüğü (Taban 10) Hesaplama

Excel’deki bir değerin günlüğünü (10 tabanı) hesaplamak için LOG işlevi aşağıdaki gibi kullanılır:

Bu bize 5’in logunun 0,69879 olduğunu söyler.

Bu işlevi VBA’da çoğaltmak için aşağıdaki işlevi tanımlayabiliriz:

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

Daha sonra B1 hücresindeki değerin günlüğünü hesaplamak için bu işlevi B2 hücresine yazabiliriz:

Bu bize 5’in logunun 0,69879 olduğunu söyler.

Bu, Excel’deki LOG işlevi tarafından hesaplanan değere karşılık gelir.

Örnek 2: VBA Kullanarak Doğal Log Hesaplama

Excel’de bir değerin doğal logaritmasını hesaplamak için LN işlevini şu şekilde kullanırız:

Bu bize 5’in doğal logaritmasının 1,609438 olduğunu söyler.

Bu işlevi VBA’da çoğaltmak için aşağıdaki işlevi tanımlayabiliriz:

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

Daha sonra B1 hücresindeki değerin doğal logaritmasını hesaplamak için bu işlevi B2 hücresine yazabiliriz:

Bu bize 5’in logunun 1.609438 olduğunu söyler.

Bu, Excel’deki LN işlevi tarafından hesaplanan değere karşılık gelir.

Ek kaynaklar

Aşağıdaki eğitimlerde VBA’da diğer ortak görevlerin nasıl gerçekleştirileceği açıklanmaktadır:

VBA: EĞER ORTALAMA ve EĞER ORTALAMA işlevleri nasıl yazılır
VBA: ETOPLA ve ETOPLA işlevleri nasıl yazılır
VBA: COUNTIF ve COUNTIFS işlevleri nasıl yazılır?