Data Truncation (without Rounding) in VBA Access

Use the below function to truncate data in VBA Access

Function Trunc(number1 As Double, DecPlace As Integer) As Double
Trunc = Fix(number1 * 10 ^ DecPlace) / 10 ^ DecPlace
End Function

Leave a Reply

Your email address will not be published. Required fields are marked *