VBA CInt-funktion

Syfte med VBA CInt-funktionen:

VBA CInt-funktionen kategoriseras som en funktion för konvertering av datatyper. Det är en inbyggd funktion i Excel VBA. Den här VBA CInt-funktionen konverterar ett uttryck till en heltalsdatatyp.
Denna funktion kan användas i antingen procedur eller funktion i ett VBA-redigeringsfönster i Excel. Vi kan använda den här VBA CInt-funktionen i valfritt antal gånger i valfritt antal procedurer eller funktioner. I följande avsnitt lär du dig många ämnen. Som vad som är syntaxen och parametrarna för CInt-funktionen, var vi kan använda den här VBA CInt-funktionen och dess realtidsexempel.

Syntax för VBA CInt-funktionen:

Syntaxen för CInt-funktionen i VBA är

CInt(Expression)

CInt-funktionen returnerar ett värde av datatypen heltal.

Parametrar eller argument:

CInt-funktionen har ett argument i Excel VBA.
här
uttryck:Det är ett obligatoriskt argument. Ett uttrycksargument representerar ett numeriskt värde eller ett strängvärde. Det används för att konvertera värdet till ett heltalsvärde.

Var vi kan tillämpa eller använda VBA CInt-funktionen?

Vi kan använda den här CInt-funktionen i VBA MS Office 365, MS Excel 2016, MS Excel 2013, 2011, Excel 2010, Excel 2007, Excel 2003, Excel 2016 för Mac, Excel 2011 för Mac, Excel Online, Excel för iPhone, Excel för iPad, Excel för Android-tabletter och Excel för Android-mobiler.

Exempel 1: Konvertera en sträng(100) till en heltalsdatatyp

Här är ett enkelt exempel på VBA-funktionen CInt. Detta exempel nedan specificerade uttryck(100) konverteras till ett värde av typen intger.

'Convert a String(100) to Integer Data TypeSub 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:
VBA CInt-funktion

Exempel 2: Konvertera ett värde (12345.678) till en heltalstyp

Här är ett enkelt exempel på VBA CInt-funktionen. Det här nedan angivna uttrycket(12345.678) konverteras till ett värde av typen intger.

'Convert a Value(12345.678) to Integer Data TypeSub 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:
VBA CInt-funktion

Exempel 3: Konvertera ett värde(40000) till en heltalsdatatyp (returnerar ett överflödsfel)

Här är ett enkelt exempel på VBA CInt-funktionen. Detta nedan exempel specificerade uttryck(40000) konverteras till ett värde av typen intger. Det returnerar ett överflödsfel. Värdet 40 000 är större än 32 767. Det heltaliga värdet ska ligga mellan -32 768 och 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:
VBA Runtime Overflow Error

Exempel 4: Konvertera en sträng (Test) till en heltalsdatatyp (returnerar ett typfel)

Här är ett enkelt exempel på VBA-funktionen CInt. Det här exemplet nedan specificerade uttrycket(Test) konverteras till ett värde av typen intger. Det returnerar felet 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:
VBA Runtime Overflow Error

Instruktioner för att använda makrokoder

Här är de stegvisa instruktionerna för att använda CInt-funktionen i Excel VBA.

Öppna en Excel-arbetsbok.
Tryck Alt+F11 för att öppna fönstret VBA Editor.
Gå till menyn Infoga och klicka på modul från de tillgängliga alternativen.
Kopiera ovan angivna makron till VBA-redigeraren.
Välj en procedur från ovanstående koder och klicka på kommandot ”Kör” eller använd tangentbordsgenvägen ”F5”.

Lista över VBA-funktioner:

Klicka på nedanstående länk för att gå tillbaka till listan över alla VBA-funktioner.

VBA-funktioner för konvertering av datatyper Lista över VBA-funktioner