Acest tutorial va arăta cum să utilizați funcția CDec VBA.
Funcția CDec
VBA CDec Convertește expresia în zecimal
Funcția VBA CDec convertește o expresie într-un tip de date zecimal. Tipul de date zecimal este de fapt un subtip al variantei de tip de date.
| 12345678910 | Sub CDecExample_1 ()MsgBox CDec (12.34000001)'Rezultatul este: 12.34000001MsgBox CDec (10000000000012.3)'Rezultatul este: 10000000000012.3MsgBox CDec (-0.00000000000001)'Rezultatul este: -0.00000000000001MsgBox CDec (-12.34)'Rezultatul este: -12.34Sfârșitul Sub |
VBA CDec Conversia șirurilor în zecimale
Funcția VBA CDec poate fi utilizată pentru a converti șirurile în zecimale dacă caracterele din șir au un sens ca numere.
| 12345678910111213141516171819 | Sub CDecExample_2 ()Dim StrEx Ca șirStrEx = "112.112112"MsgBox CDec (StrEx)'Rezultatul este: 112.112112StrEx = "112,3"MsgBox CDec (StrEx)„Rezultatul este: 112.3StrEx = "11,2"MsgBox CDec (StrEx)„Rezultatul este: 112, este ignoratStrEx = "112,07 USD"MsgBox CDec (StrEx)'Rezultatul este: 112,07 $ este ignoratSfârșitul Sub |
Programare VBA | Generatorul de coduri funcționează pentru dvs.!
VBA CDec Run-Time Error 13 Type Mismatch
Utilizarea funcției VBA CDec cu șiruri care conțin caractere nenumerice sau caractere care nu au semnificație în context numeric va avea ca rezultat o eroare în timp de execuție „13”: Tip nepotrivire.
| 1234567 | Sub CDecExample_3 ()„Codul de mai jos va avea ca rezultat un mesaj de EROARE„CDec nu poate gestiona caractere nenumericeDim StrEx Ca șirStrEx = "Ab13"MsgBox CDec (StrEx)Sfârșitul Sub |
VBA CDec Run-Time Error 6 Overflow
Utilizarea funcției VBA CDec cu șiruri care au ca rezultat o valoare mai mică sau mai mare decât zecimala așteptată va duce la o eroare de timp de execuție „6”: Overflow. Un număr zecimal ar trebui să fie între -7,9 E28 și +7,9 E28.
| 1234567 | Sub CDecExample_4 ()„Codul de mai jos va avea ca rezultat un mesaj de EROARE„CDec poate gestiona numere cuprinse între -7,9 E28 și +7,9 E28Dim StrEx ca variantăStrEx = 8E + 30MsgBox CDec (StrEx)Sfârșitul Sub |
Setări regionale VBA CDec
Funcția VBA CDec are un comportament diferit de conversie a șirurilor cu virgulă sau punct. Utilizează setările regionale ale sistemului de operare pentru separatorul zecimal și separatorul de cifre.
| 12345678910111213141516 | Sub CDecExample_5 ()Dim StrEx Ca șirStrEx = "1,0000009"MsgBox CDec (StrEx)„Dacă setările regionale au, ca separator de grupare atunci„Rezultatul este: 19'Dacă setările regionale au, ca separator zecimal atunci„Rezultatul este: 1.0000009StrEx = "1.0000009"MsgBox CDec (StrEx)„Dacă setările regionale au. ca separator de grupare atunci„Rezultatul este: 19„Dacă setările regionale au. ca separator zecimal atunci„Rezultatul este: 1.0000009Sfârșitul Sub |
