Función CLng en VBA

Devuelve una expresión que se ha convertido en tipo Variant de subtipo Long. Muestra que el resultado de alguna operación se debe expresar como un tipo de dato particular en vez de como el tipo de dato predeterminado. Por ejemplo, utilizar CLng para forzar un valor aritmético de tipo entero en los casos en que normalmente aparecen valores aritméticos de moneda, precisión simple o precisión doble.

Ejemplo: de 13,3  a  13 ; las partes fraccionarias se redondean.

Ademas, se Utiliza la función CLng para proporcionar conversiones de tipo internacional de cualquier otro tipo de datos a un subtipo Long. Por ejemplo, los distintos separadores decimales se reconocen apropiadamente según la configuración regional de su sistema, de la misma manera que los separadores de miles.

El siguiente ejemplo utiliza la función CLng para convertir un valor en tipo Long:

Sub FRANK()
Dim A1 As Double
Dim A2 As Double
Dim alng1 As Long
Dim alng2 As Long
A1 = 25427.45
A2 = 25427.55
alng1 = CLng(A1)
alng2 = CLng(A2)
MsgBox CLng(A1)
MsgBox CLng(A2)
End Sub

 

Elaborado por: Frank Alvarez Espinoza