Функция CDec

Функция CDec(Conversion to Decimal) используется для преобразования аргумента в субтип Decimal типа данных Variant. Поскольку в Visual Basic нет встроенного типа данных Decimal, аргумент преобразовывается в тип Variant с субтипом Decimal. Субтип Decimal обычно применяют для максимально точного представления чисел, с трудом вписывающихся в допустимый диапазон чисел Visual Basic(т.е. чисел с очень большим или очень малым абсолютным значением или чисел с большим количеством значащих цифр после запятой

Функция возвращает значение Expression, преобразованное в субтип данных Decimal типа данных Variant

Expression

Любое числовое значение или строка, представляющая целое число в диапазоне +/-79 228 162 514 264 337 593 543 950 335 или смешанное с не более чем 28 цифрами в дробной части в диапазоне +/-7.9228162514264337593543950335. Минимально возможное ненулевое число 0.0000000000000000000000000001
Если аргумент не попадает в диапазон допустимых значений Double, то генерируется ошибка стадии выполнения Overflow
Если аргумент имеет тип данных String, он должен представлять число, иначе генерируется ошибка стадии выполнения Type mismatch

Dim retval
retval = CDec(1.20000000000099)' преобразуем в Decimal
Debug.Print retval