• Home
 · 
• Math/Dates
 · 
• This function rounds up and down in any step that you choose.

This function rounds up and down in any step that you choose.

This function rounds up and down in any step that you choose.

Rate This function rounds up and down in any step that you choose.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

    ' ***********************
    ' Mode    Process
    ' ----    -------
    '  UP     RoundUp
    '  DN     RoundDN
    ' ***********************
    Select Case UCase(Mode)
        Case "DN"
            doRound = (Int(Value / RStep) * RStep)

        Case "UP"
            If Value Mod RStep > 0 Then
                doRound = ((Int(Value / RStep) * RStep) + RStep)
            Else
                doRound = Value
            End If '»If Value Mod RStep > 0 Then
            
    End Select '»Select Case UCase(Mode)
End Function