Функция CLng

Функция CLng(Conversion to Long) используется для приведения выражения в тип Long

Функция CLng возвращает значение Expression, преобразованное в числовой длинный тип данных Long. Дробная часть при этом округляется

Expression

Любое числовое выражение или строка, представляющая число от -2147483648 до 2147483647
Если числовое значение Expression не попадает в диапазон допустимых значений, происходит ошибка стадии выполнения Overflow.
Если Expression имеет тип данных String,то он должен быть числом,иначе возникает ошибка стадии выполнения Type mismasth.
Если дробная часть Expression равна 0.5, CLng всегда округляет его до ближайшего четного числа, т.е. CLng(0.5)=0, a CLng(1.5)=2

Dim A,retval
A=1234.5678  ' A имеет тип Double
retval = CLng(A)' преобразуем в Long
Debug.Print retval ' получаем 1235