Функция Round [VBA]
Функцията Round връща число, закръглено до зададения брой цифри.
Round( expression as Double [,numdecimalplaces as Integer] )
Double
expression: задължителен. Числовият израз, който да бъде закръглен.
numdecimalplaces: незадължителен. Указва колко позиции вдясно от десетичния разделител да съдържа закръглената стойност. Подразбира се стойност 0.
REM ***** BASIC *****
Option VBASupport 1
Sub Example_Round
Dim r
r = Pi
print r ' 3,14159265358979
print Round(r, 5) ' 3,14159
r = exp(1)
print r ' 2,71828182845904
print Round(r) ' 3
End Sub