Cara menghitung logaritma di vba (dengan contoh)


Anda dapat menggunakan sintaks berikut untuk menghitung log (basis 10) suatu nilai menggunakan VBA:

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

Dan Anda dapat menggunakan sintaks berikut untuk menghitung logaritma natural suatu nilai menggunakan VBA:

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

Contoh berikut menunjukkan cara menggunakan setiap fungsi dalam praktik.

Contoh 1: Hitung Log (Basis 10) Menggunakan VBA

Untuk menghitung log (basis 10) suatu nilai di Excel, kita akan menggunakan fungsi LOG sebagai berikut:

Ini memberitahu kita bahwa log dari 5 adalah 0.69879 .

Untuk mereplikasi fungsi ini di VBA, kita dapat mendefinisikan fungsi berikut:

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

Kita kemudian dapat mengetikkan fungsi ini ke dalam sel B2 untuk menghitung log nilai di sel B1 :

Ini memberitahu kita bahwa log dari 5 adalah 0.69879 .

Ini sesuai dengan nilai yang dihitung oleh fungsi LOG di Excel.

Contoh 2: Menghitung Log Natural Menggunakan VBA

Untuk menghitung logaritma natural suatu nilai di Excel, kita akan menggunakan fungsi LN sebagai berikut:

Ini memberitahu kita bahwa logaritma natural dari 5 adalah 1,609438 .

Untuk mereplikasi fungsi ini di VBA, kita dapat mendefinisikan fungsi berikut:

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

Kita kemudian dapat mengetikkan fungsi ini di sel B2 untuk menghitung logaritma natural dari nilai di sel B1 :

log alami di VBA

Ini memberitahu kita bahwa log dari 5 adalah 1.609438 .

Ini sesuai dengan nilai yang dihitung oleh fungsi LN di Excel.

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

VBA: Cara menulis fungsi AVERAGEIF dan AVERAGEIFS
VBA: Cara menulis fungsi SUMIF dan SUMIFS
VBA: Cara menulis fungsi COUNTIF dan COUNTIFS

Tambahkan komentar

Alamat email Anda tidak akan dipublikasikan. Ruas yang wajib ditandai *