=1,67*LOG(15000/(D30*D24))
formülü ile hesaplanan değeri acsess te aynı şekilde hesaplatmak için kodu nasıl yazmalıyım?
Bir çok kombinasyon denedim ancak sonuçlar hiç tutmadı

Bu acemiye yardım ettiğiniz şimdiden teşekkürler...
Static Function Log10(X)
Log10 = Log(X) / Log(10#)
End Function
Dim MyAngle, MyLog
' Define angle in radians.
MyAngle = 1.3
' Calculate inverse hyperbolic sine.
MyLog = Log(MyAngle + Sqr(MyAngle * MyAngle + 1))
Static Function Log10(X)
Log10 = Log(X) / Log(10#)
End Function
kodu vb sayfasına yapıştır.MyLog = Log(MyAngle + Sqr(MyAngle * MyAngle + 1))
olarak verilen koduMyLog = Log10(MyAngle + Sqr(MyAngle * MyAngle + 1))
şeklinde kullan, sizin kodunuza göre;MyLog = 1.67 * Log10(15000 / (1.86 * 316))