Converting a string into an integer using VBA code

[sophl4]

Hi,

I'm trying to convert the string "1234" into an integer using VBA code. I know it can be converted on a worksheet by using the Value function. What would be the equivalent of this in VBA? I'm having trouble finding the code for it.

Thanks in advance.

 

[Rick Rothstein]

Use the CLng function to convert it. Something like this...

YourStringNumber = "1234"
ConvertedToIntegerValue = CLng(YourStringNumber)

Another possibility (assuming your number is always a whole number) is this...

YourStringNumber = "1234"
ConvertedToIntegerValue = Val(YourStringNumber)

 

[VoG]

Try like this

Sub atest()
Const s As String = "1234"
Dim i As Integer
i = CInt(s)
MsgBox i
End Sub

 

[sophl4]

Thanks a lot for your help, Rick and VoG.

 

[sophl4]

Tried it. Works like a treat. Awesome!! You're legends. Cheers.

 

[pgc01]

Hi sophl4

Remark: if you assign the value to a variable the conversion is automatic, according to the variable type.

In the example the Long variable will get the value 1235 (integer rounded value) and the Double gets 1234.5678.

Sub Test()
Const s As String = "1234.5678"
Dim l As Long
Dim d As Double
 
l = s
d = s
 
'...
 
End Sub

 

[sophl4]

Hi pgc01, tried your code out and it works great!! Thanks so much for helping me out. Cheers.