How to Round Up Values in VBA (With Examples)


You can use the RoundUp method in VBA to round values up.

This function uses the following basic syntax:

Sub RoundUpValue()
    Range("B1") = WorksheetFunction.RoundUp(Range("A1"), 0)
End Sub

This particular example will round up the value in cell A1 to the nearest whole number and display the result in cell B1.

Note that the second argument in the RoundUp method specifies the number of digits to round where:

  • -3 rounds up to the nearest thousand
  • -2 rounds up to the nearest hundred
  • -1 rounds up to the nearest ten
  • 0 rounds up to the nearest whole number
  • 1 rounds up to the nearest tenth (one decimal place)
  • 2 rounds up to the nearest hundredth (two decimal places)
  • 3 rounds up to the nearest thousandth (three decimal places)

And so on.

The following examples show how to use the RoundUp method in practice.

Example 1: Round Up to Nearest Whole Number in VBA

We can create the following macro to round up the value in cell A1 to the nearest whole number and display the result in cell B1:

Sub RoundUpValue()
    Range("B1") = WorksheetFunction.RoundUp(Range("A1"), 0)
End Sub

When we run this macro, we receive the following output:

Notice that the value 1,432.78 in cell A1 has been rounded up to the nearest whole number of 1,433 in cell B1.

Example 2: Round Up to Nearest Hundred in VBA

We can create the following macro to round up the value in cell A1 to the nearest hundred and display the result in cell B1:

Sub RoundUpValue()
    Range("B1") = WorksheetFunction.RoundUp(Range("A1"), -2)
End Sub

When we run this macro, we receive the following output:

Notice that the value 1,432.78 in cell A1 has been rounded up to the nearest hundred of 1,500 in cell B1.

Example 3: Round Up to Nearest Tenth in VBA

We can create the following macro to round up the value in cell A1 to the nearest tenth (i.e. one decimal place) and display the result in cell B1:

Sub RoundUpValue()
    Range("B1") = WorksheetFunction.RoundUp(Range("A1"), 1)
End Sub

When we run this macro, we receive the following output:

Notice that the value 1,432.78 in cell A1 has been rounded up to the nearest tenth of 1,432.8 in cell B1.

Note: You can find the complete documentation for the VBA RoundUp method here.

Additional Resources

The following tutorials explain how to perform other common tasks in VBA:

VBA: How to Write SUMIF and SUMIFS Functions
VBA: How to Write COUNTIF and COUNTIFS Functions
VBA: How to Write AVERAGEIF and AVERAGEIFS Functions

Leave a Reply

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