Este tutorial demostrará cómo utilizar la función CDec VBA.
Función CDec
VBA CDec Convertir expresión a decimal
La función VBA CDec convierte una expresión en un tipo de datos decimal. El tipo de datos decimal es en realidad un subtipo del tipo de datos variante.
| 12345678910 | Sub CDecExample_1 ()MsgBox CDec (12.34000001)El resultado es: 12.34000001MsgBox CDec (10000000000012.3)El resultado es: 10000000000012.3MsgBox CDec (-0,00000000000001)'El resultado es: -0,00000000000001MsgBox CDec (-12,34)El resultado es: -12,34End Sub |
VBA CDec Conversión de cadenas a decimales
La función VBA CDec se puede utilizar para convertir cadenas a decimales si los caracteres de la cadena tienen un significado como números.
| 12345678910111213141516171819 | Sub CDecExample_2 ()Dim StrEx como cadenaStrEx = "112.112112"MsgBox CDec (StrEx)El resultado es: 112.112112StrEx = "112,3"MsgBox CDec (StrEx)El resultado es: 112,3StrEx = "11,2"MsgBox CDec (StrEx)El resultado es: 112, se ignoraStrEx = "$ 112.07"MsgBox CDec (StrEx)'El resultado es: 112.07 $ se ignoraEnd Sub |
Programación VBA | ¡Code Generator funciona para usted!
Error 13 en tiempo de ejecución de VBA CDec No coinciden los tipos
El uso de la función VBA CDec con cadenas que contienen caracteres no numéricos o caracteres que no tienen significado en el contexto numérico dará como resultado un error de tiempo de ejecución "13": no coinciden los tipos.
| 1234567 | Sub CDecExample_3 ()'El código a continuación resultará en un mensaje de ERROR'CDec no puede manejar caracteres no numéricosDim StrEx como cadenaStrEx = "Ab13"MsgBox CDec (StrEx)End Sub |
Desbordamiento del error 6 en tiempo de ejecución de VBA CDec
El uso de la función VBA CDec con cadenas que dan como resultado un valor menor o mayor que el decimal esperado resultará en un error de tiempo de ejecución "6": desbordamiento. Un número decimal debe estar entre -7,9 E28 y +7,9 E28.
| 1234567 | Sub CDecExample_4 ()'El código a continuación resultará en un mensaje de ERROR'CDec puede manejar números entre -7,9 E28 y +7,9 E28Dim StrEx como varianteStrEx = 8E + 30MsgBox CDec (StrEx)End Sub |
Configuración regional de VBA CDec
La función VBA CDec tiene un comportamiento diferente al convertir cadenas con coma o punto. Utiliza la configuración regional del sistema operativo para el separador decimal y el separador de dígitos.
| 12345678910111213141516 | Sub CDecExample_5 ()Dim StrEx como cadenaStrEx = "1,0000009"MsgBox CDec (StrEx)'Si la configuración regional tiene, como separador de agrupación,El resultado es: 19'Si la configuración regional tiene, como separador decimal,'El resultado es: 1.0000009StrEx = "1.0000009"MsgBox CDec (StrEx)'Si la configuración regional tiene. como un separador de agrupación entoncesEl resultado es: 19'Si la configuración regional tiene. como separador decimal entonces'El resultado es: 1.0000009End Sub |
