VBA CInt Function

VBA CInt Function in Excel

VBA CInt Function in Excel is categorized as a Data Type Conversion function. It is a built-in function in Excel VBA. This VBA CInt function converts an expression to an Integer data type.

This function use in either procedure or function in a VBA editor window in Excel. We can use this VBA CInt Function in any number of times in any number of procedures or functions. In the following section you learn many topics. Like what is the syntax and parameters of the CInt function, where we can use this VBA CInt Function and it’s real-time examples.

Syntax of VBA CInt Function:

The syntax of the CInt Function in VBA is

CInt(Expression)

The CInt function returns a integer data type value.

Parameters or Arguments:

The CInt function has one argument in Excel VBA.
where
Expression:It is a mandatory argument. An expression argument represents a numeric or string value. It is used to convert the value to a integer value.

Where we can apply or use VBA CInt Function?

We can use this CInt Function in VBA MS Office 365, MS Excel 2016, MS Excel 2013, 2011, Excel 2010, Excel 2007, Excel 2003, Excel 2016 for Mac, Excel 2011 for Mac, Excel Online, Excel for iPhone, Excel for iPad, Excel for Android tablets and Excel for Android Mobiles.

Example 1: Convert a String(100) to Integer Data Type

Here is a simple example of the VBA CInt function. This below example specifies expression(100) converts to an integer type value.

'Convert a String(100) to Integer Data Type
Sub VBA_CInt_Function_Ex1()

    'Variable declaration
    Dim sValue As String
    Dim dResult As Double
    
    sValue = 100
        
    dResult = CInt(sValue)
        
    MsgBox "String(100) to Integer Data Type : " & dResult, vbInformation, "VBA CInt Function"
    
End Sub

Output: Here is the screen shot of the first example output.
VBA CInt Function

Example 2: Convert a Value(12345.678) to Integer Data Type

Here is a simple example of the VBA CInt function. This below example specifies expression(12345.678) converts to an integer type value.

'Convert a Value(12345.678) to Integer Data Type
Sub VBA_CInt_Function_Ex2()

    'Variable declaration
    Dim sValue As Double
    Dim dResult As Double
    
    sValue = 12345.678
        
    dResult = CInt(sValue)
        
    MsgBox "Value(12345.678) to Integer Data Type : " & dResult, vbInformation, "VBA CInt Function"
    
End Sub

Output: Here is the screen shot of the second example output.
VBA CInt Function

Example 3: Convert a Value(40000) to Integer Data Type (Returns an Overflow Error)

Here is a simple example of the VBA CInt function. This below example specifies expression(40000) converts to an intger type value. It returns an Overflow error. The value 40,000 is greater than 32,767. The integer value should be in between -32,768 to 32,767.

'Convert a Value(40000) to Integer Data Type (Returns an Overflow Error)
Sub VBA_CInt_Function_Ex3()

    'Variable declaration
    Dim sValue As Currency
    Dim dResult As Double
    
    sValue = 40000
        
    dResult = CInt(sValue)
        
    MsgBox "Value(40000) to Integer Data Type : " & dResult, vbInformation, "VBA CInt Function"
End Sub

Output: Here is the screen shot of the third example output.
VBA Runtime Overflow Error

Example 4: Convert a string(Test) to Integer Data Type (Returns an Type mismatch Error)

Here is a simple example of the VBA CInt function. This below example specified expression(Test) converts to an integer type value. It returns Type mismatch error.

'Convert a string(Test) to Integer Data Type (Returns Type mismatch Error)
Sub VBA_CInt_Function_Ex4()

    'Variable declaration
    Dim sValue As String
    Dim dResult As Double
    
    sValue = "Test"
        
    dResult = CInt(sValue)
        
    MsgBox "String(Test) to Integer Data Type : " & dResult, vbInformation, "VBA CInt Function"
    
End Sub

Output: Here is the screen shot of the fourth example output.
VBA Runtime Overflow Error

Instructions to Run VBA Macro Code or Procedure:

You can refer the following link for the step by step instructions.

Instructions to run VBA Macro Code

Other Useful Resources:

Click on the following links of the useful resources. These helps to learn and gain more knowledge.

VBA Tutorial VBA Functions List VBA Arrays in Excel Blog

VBA Editor Keyboard Shortcut Keys List VBA Interview Questions & Answers

Leave a Reply