Problemstellung:

Für 32Bit und 64Bit Office Versionen

Wie kann ich unter Access Abrunden? 

Function RoundDown(NumberToRound As Double) As Integer
    RoundDown = Int(NumberToRound)
End Function

Aufruf:

Dim x As Long
x = RoundDown(1317.4258) 

Ergebnis: x = 1317

Achtung: gilt nur für den Zahlenbereich -32.768 bis 32.767

Ähnliche Artikel