VBA Tipp: Aufrunden in Abfragen

Aus DBWiki
Wechseln zu: Navigation, Suche

Anforderung

Eine reelle Zahl soll auf die nächst größere Ganzzahl aufgerundet werden.

Lösung

Diese Funktionionalität ist in anderen Programmiersprachen oft als Ceil ausgwewiesen.

Public Function Ceil(ByRef Value As Variant) As Variant
   Ceil = -Int(-Value)
End Function

In Abfragen oder Steuerelementinhalten kann statt der Ceil-Funktion auch direkt der Ausdruck -Int(-[Feld oder Steuerelementbezug]) verwendet werden.

Wiki-Links

Web-Links