Vba: як округлити значення до 2 знаків після коми

Ви можете використовувати такі методи, щоб округлити значення до 2 знаків після коми за допомогою VBA:

Спосіб 1. Округлення значення до 2 знаків після коми

 Sub RoundTwoDecimals()
    Range(" B2 ") = WorksheetFunction.Round(Range(" A2 "), 2)
End Sub

У цьому конкретному прикладі значення в клітинці A2 буде округлено до двох десяткових знаків і відобразиться округлене значення в клітинці B2 .

Спосіб 2: Округліть усі значення в діапазоні до 2 знаків після коми

 Sub RoundTwoDecimals()
    Dim i As Integer

    For i = 2 To 9
        Range(" B " & i) = WorksheetFunction.Round(Range(" A " & i), 2)
    Next i
End Sub

У цьому конкретному прикладі кожне значення в діапазоні A2:A9 буде округлено до двох знаків після коми та відображено округлені значення в діапазоні B2:B9 .

Наступні приклади показують, як використовувати кожен метод на практиці.

Приклад 1: Округлення значення до 2 знаків після коми

Ми можемо створити наступний макрос, щоб округлити значення в клітинці A2 до двох знаків після коми та відобразити результат у клітинці B2 :

 Sub RoundTwoDecimals()
    Range(" B2 ") = WorksheetFunction.Round(Range(" A2 "), 2)
End Sub

Коли ми запускаємо цей макрос, ми отримуємо такий результат:

Зауважте, що значення 15,248 у клітинці A2 було округлено до двох знаків після коми (15,25) у клітинці B2 .

Приклад 2: Округліть усі значення в діапазоні до 2 знаків після коми

Ми можемо створити наступний макрос, щоб округлити кожне значення в діапазоні A2:A9 до двох знаків після коми та відобразити округлені значення в діапазоні B2:B9 :

 Sub RoundTwoDecimals()
    Dim i As Integer

    For i = 2 To 9
        Range(" B " & i) = WorksheetFunction.Round(Range(" A " & i), 2)
    Next i
End Sub

Коли ми запускаємо цей макрос, ми отримуємо такий результат:

Зауважте, що кожне значення в діапазоні A2:A9 було округлено до двох знаків після коми, а округлені значення відображаються в діапазоні B2:B9 .

Примітка . Ви можете знайти повну документацію для методу VBA Round тут .

Додаткові ресурси

У наступних посібниках пояснюється, як виконувати інші типові завдання у VBA:

Як округлити значення у VBA
Як округлити значення у VBA