Цей підручник покаже, як використовувати функцію CDec VBA.
Функція CDec
VBA CDec Перетворення виразів у десяткові
Функція VBA CDec перетворює вираз у десятковий тип даних. Десятковий тип даних насправді є підтипом варіативного типу даних.
12345678910 | Під CDecExample_1 ()MsgBox CDec (12.34000001)Результат: 12.34000001MsgBox CDec (10000000000012.3)Результат: 10000000000012.3MsgBox CDec (-0,0000000000000001)Результат: -0,00000000000001MsgBox CDec (-12,34)Результат: -12,34End Sub |
VBA CDec Перетворення рядків у десяткові
Функцію VBA CDec можна використовувати для перетворення рядків у десяткові, якщо символи в рядку мають значення як числа.
12345678910111213141516171819 | Під CDecExample_2 ()Dim StrEx як рядокStrEx = "112.112112"MsgBox CDec (StrEx)Результат: 112.112112StrEx = "112,3"MsgBox CDec (StrEx)Результат: 112.3StrEx = "11,2"MsgBox CDec (StrEx)'Результат: 112, ігноруєтьсяStrEx = "$ 112,07"MsgBox CDec (StrEx)Результат: 112,07 $ ігноруєтьсяEnd Sub |
Програмування VBA | Генератор коду працює для вас!
Помилка під час виконання VBA CDec 13 Невідповідність типу
Використання функції VBA CDec із рядками, що містять нечислові символи або символи, які не мають значення в числовому контексті, призведе до помилки під час виконання "13": Невідповідність типу.
1234567 | Sub CDecExample_3 ()'Код нижче призведе до повідомлення про помилку'CDec не може обробляти нечислові символиDim StrEx як рядокStrEx = "Ab13"MsgBox CDec (StrEx)End Sub |
Помилка під час виконання VBA CDec 6 Переповнення
Використання функції VBA CDec із рядками, що призводять до значення, меншого або більшого за очікувану десяткову, призведе до помилки під час виконання "6": Переповнення. Десяткове число має бути від -7,9 E28 до +7,9 E28.
1234567 | Під CDecExample_4 ()'Код нижче призведе до повідомлення про помилку'CDec може обробляти числа від -7,9 E28 до +7,9 E28Dim StrEx як варіантStrEx = 8E+30MsgBox CDec (StrEx)End Sub |
Регіональні налаштування VBA CDec
Функція VBA CDec має різну поведінку, перетворюючи рядки комою або крапкою. Він використовує регіональні налаштування операційної системи для десяткового роздільника та роздільника цифр.
12345678910111213141516 | Під CDecExample_5 ()Dim StrEx як рядокStrEx = "1,0000009"MsgBox CDec (StrEx)'Якщо регіональні налаштування мають роздільник групування, тодіРезультат: 19'Якщо регіональні налаштування мають, як роздільник десяткової, тоРезультат: 1,0000009StrEx = "1,0000009"MsgBox CDec (StrEx)'Якщо регіональні налаштування є. як роздільник групиРезультат: 19'Якщо регіональні налаштування є. як десятковий роздільникРезультат: 1,0000009End Sub |