logaritme in vba

[Doohan]

Beste helper,

Ik probeer een logaritmische regel in vba te krijgen

=F11+10*LOG(4*PI()*1^2))

in excel werkt deze de uitkomst moet ca.11 hoger zijn dan het getal in F11

in vba zou dus ook 11 moeten zijn ik krijg dit echter niet voor elkaar wie kan mij helpen

txtHz1 = lblHz1 + 10 * Log(4 * (WorksheetFunction.Pi) * 1 ^ 2)

 

[alphamax]

txtHz1 = lblHz1 + 10 * Log(4 * (WorksheetFunction.Pi) * 1 ^ 2) [COLOR=#ff0000]/ Log(10)[/COLOR]

de excel-log heeft een grondtal als extra parameter, wanneer deze niet vermeldt is, dan kiest excel als grondtal 10
de vba-log heeft als grondtal e deze kan je aanpassen naar grondtal 10 door onderstaande code

Static Function Log10(X)
    Log10 = Log(X) [COLOR=#ff0000]/ Log(10#)[/COLOR]
End Function

 

[Doohan]

Dank je het werkt op naar de volgende uitdaging.
Ik ga deze opgelost verklaren en een nieuwe vraag stellen