Jump to content
YOUR-AD-HERE
HOSTING
TOOLS
SERVICE

Locked Alternative CLng


top10

Recommended Posts

[HIDE-THANKS][LENGUAJE=VB]Declare Function vbaI4Str Lib "msvbvm60" Alias "__vbaI4Str" (ByVal sStr As String) As Long

 

Public Function Alternative_Clng(ByVal expression As Variant) As Long

Dim Exp As String

Exp = expression

Alternative_Clng = vbaI4Str(StrConv(Exp, vbUnicode))

End Function

[/LENGUAJE][/HIDE-THANKS]

Link to comment
Share on other sites

Guest
This topic is now closed to further replies.
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.