VBA RoundUp

Excel VBA RoundUp Function

Similar to worksheet function where we round up the  numbers to the closest integers, in VBA we have a RoundUp function which decrease the decimal point for us and the syntax to use the roundup function is as follows Round up ( Number, Number of Digits After Decimal) these two arguments in the function are mandatory.

When we work with numbers and calculations we get fraction numbers after the whole number and it is quite common in everyday business. We don’t generally bother about the decimal values because it doesn’t make any impact on our end result. In those situations, we need to round up the numbers to the nearest whole number or immediate whole number. By using the RoundUp function we can actually perform this task.

If you have searched in VBA for RoundUp function then you must have not found it because it is a worksheet function. In order to access the RoundUp function, we need to use Worksheet Function class.

Before this recollect the syntax of the RoundUp function.

Examples

Let’s perform the task of rounding up the number “288.5264”. We will see all the numbers with this example.

Example #1 – When the Second Argument is Zero

Look at the below VBA code.

Code:

Sub RoundUp_Example1()

    Dim k As Double

    k = WorksheetFunction.RoundUp(288.5264, 0)

    MsgBox k

End Sub

When you will run the above code it will convert the provided number i.e. 288.5264 to the nearest whole number i.e. 289

Example #2 – When the Second Argument is 1

Look at the below code to see what happens when we pass one as a second argument.

Code:

Sub RoundUp_Example2()

    Dim k As Double

    k = WorksheetFunction.RoundUp(288.5264, 1)

    MsgBox k

End Sub

This code will convert the given number to one decimal point i.e. 288.6

Example #3 – When the Second Argument is 2

Look at the below code to see what happens when we pass two as a second argument.

Code:

Sub RoundUp_Example3()

    Dim k As Double

    k = WorksheetFunction.RoundUp(288.5264, 2)

    MsgBox k

End Sub

This code will convert the given number to two decimal points i.e. 288.53

Example #4 – When the Second Argument is 3

Look at the below code to see what happens when we pass three as a second argument.

Code:

Sub RoundUp_Example4()

    Dim k As Double

     k = WorksheetFunction.RoundUp(288.5264, 3)

     MsgBox k

End Sub

This code will convert the given number to three decimal points i.e. 288.527

Example #5 – When the Second Argument is -1

Look at the below code to see what happens when we pass minus one as a second argument.

Code:

Sub RoundUp_Example5()

    Dim k As Double

    k = WorksheetFunction.RoundUp(288.5264, -1)

    MsgBox k

End Sub

This code will convert the given number to the nearest ten i.e. 290.

Example #6 – When the Second Argument is -2

Look at the below code to see what happens when we pass minus two as a second argument.

Code:

Sub RoundUp_Example6()

    Dim k As Double

    k = WorksheetFunction.RoundUp(288.5264, -2)

    MsgBox k

End Sub

This code will convert the given number to nearest hundred i.e. 300.

Example #7 – When the Second Argument is -3

Look at the below code to see what happens when we pass minus three as a second argument.

Code:

Sub RoundUp_Example7()

    Dim k As Double

    k = WorksheetFunction.RoundUp(288.5264, -3)

    MsgBox k

End Sub

This code will convert the number to the nearest thousand i.e. 1000.

Like this, we can use the ROUNDUP function in VBA as part of the worksheet function class to rounding up the numbers based on the provided second argument.

Recommended Articles

This has been a guide to VBA RoundUp. Here we discuss how to use the vba RoundUp worksheet function for rounding up the given number based on the given argument with downloadable excel template. You can learn more about VBA from the following articles –

• Rename Sheet using VBA Code
• Examples of VBA Wait Function
• TimeValue Function in VBA
• Count Numerical Values in VBA
• Integer Data Type in Excel VBA
• Boolean Datatype in VBA