Excel VBA CSng Function

VBA CSng Function: The CSng function in VBA converts the supplied expression into a single-precision floating-point number (single data type).

Syntax

CSng (Expression)

Parameter

Expression (required) – This parameter represents the expression that you want to convert to a single data type.

Return

This function returns a single-precision floating-point number after converting the supplied expression into a single data type.

Example 1

Sub CSngFunction_Example1()
 ' Converting the string and numeric value into Single
 Dim sng As Single
 sng = CSng("0.99999")
 ' The variable sng will return 0.999989986
 Cells(1, 1).Value = sng
 End Sub 

Output

0.999989986

Example 2

Sub CSngFunction_Example2()
 ' Converting the string and numeric value into Single
 Dim sng As Single
 sng = CSng(2.01 * 2.01)
 ' The variable sng will return 4.040100098
 Cells(1, 1).Value = sng
 End Sub 

Output

4.040100098

Example 3

Sub CSngFunction_Example3()
 ' Converting the string and numeric value into Single
 Dim sng As Single
 sng = CSng("Hello VBA")
 ' The variable sng will return a run-time error
 Cells(1, 1).Value = sng
 End Sub 

Output