TOP

Функция VBA: Round

Описание

Функция VBA Round округляет число до указанного числа знаков после запятой.


Синтаксис Round

Round(число, количество_десятичных_знаков)

Пример VBA Round

Использование функции Round для округления числа до 2-х знаков после запятой:

  1. Sub RoundExample1()  
  2.   
  3.      number = 12.3456  
  4.       
  5.      round = Round(number, 2)  
  6.       
  7.      MsgBox round 'Возвращает 12.35  
  8.       
  9. End Sub  

Использование функции Round для округления различных числовых значений:

  1. Sub RoundExample2()  
  2.   
  3.      MsgBox Round(14.2) 'Возвращает: 14  
  4.      MsgBox Round(-14.2) 'Возвращает: -14  
  5.      MsgBox Round("14.2"'Возвращает: 14  
  6.      MsgBox Round("-14.2"'Возвращает: -14  
  7.       
  8.      MsgBox Round(9.5) 'Возвращает: 10  
  9.      MsgBox Round(-9.5) 'Возвращает: -10  
  10.       
  11.      MsgBox Round(1.25, 1) 'Возвращает: 1.2  
  12.      MsgBox Round(50, 1) 'Возвращает: 50  
  13.       
  14.      MsgBox Round(4532.6351, 2) 'Возвращает: 4532.64  
  15.       
  16. End Sub