Obiectivul funcției VBA CInt:

Funcția VBA CInt este clasificată ca o funcție de conversie a tipului de date. Este o funcție încorporată în Excel VBA. Această funcție VBA CInt convertește o expresie într-un tip de date Integer.
Această funcție poate fi utilizată fie în procedură, fie în funcție într-o fereastră a editorului VBA din Excel. Putem utiliza această funcție VBA CInt în orice număr de ori în orice număr de proceduri sau funcții. În secțiunea următoare veți învăța mai multe subiecte. Cum ar fi care este sintaxa și parametrii funcției CInt, unde putem utiliza această funcție VBA CInt Function și exemplele sale în timp real.

Sintaxa funcției VBA CInt:

Sintaxa funcției CInt în VBA este

CInt(Expression)

Funcția CInt returnează o valoare de tip de date de tip întreg.

Parametrii sau argumentele:

Funcția CInt are un singur argument în Excel VBA.
unde
Expresie: Este un argument obligatoriu. Un argument expresie reprezintă o valoare numerică sau un șir de caractere. Este utilizat pentru a converti valoarea într-o valoare întreagă.

Unde putem aplica sau utiliza funcția VBA CInt?

Potem utiliza această funcție CInt în VBA MS Office 365, MS Excel 2016, MS Excel 2013, 2011, Excel 2010, Excel 2007, Excel 2003, Excel 2016 pentru Mac, Excel 2011 pentru Mac, Excel Online, Excel pentru iPhone, Excel pentru iPad, Excel pentru tablete Android și Excel pentru telefoane mobile Android.

Exemplul 1: Conversia unui șir de caractere (100) în date de tip întreg

Iată un exemplu simplu de utilizare a funcției VBA CInt. Acest exemplu de mai jos a specificat expresia(100) se convertește într-o valoare de tip întreg.

'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

Scoatere: Iată captura de ecran a ieșirii din primul exemplu.

Exemplul 2: Conversia unei valori(12345.678) în date de tip întreg

Iată un exemplu simplu al funcției VBA CInt. Acest exemplu de mai jos a specificat expresia(12345.678) se convertește într-o valoare de tip întreg.

'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

Lovitură: Iată captura de ecran a ieșirii celui de-al doilea exemplu.

Exemplul 3: Conversia unei valori(40000) în date de tip întreg (returnează o eroare de depășire)

Iată un exemplu simplu al funcției VBA CInt. Acest exemplu de mai jos a specificat expresia(40000) se convertește într-o valoare de tip întreg. Aceasta returnează o eroare Overflow. Valoarea 40.000 este mai mare decât 32.767. Valoarea întreagă ar trebui să fie cuprinsă între -32,768 și 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

Scoatere: Iată captura de ecran a ieșirii celui de-al treilea exemplu.

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

Iată un exemplu simplu de utilizare a funcției VBA CInt. Acest exemplu de mai jos a specificat expresia(Test) se convertește într-o valoare de tip întreg. Aceasta returnează o eroare de nepotrivire de tip.

'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

Scoatere: Aici este captura de ecran a ieșirii celui de-al patrulea exemplu.

Instrucțiuni de utilizare a codurilor macro

Iată instrucțiunile pas cu pas pentru a utiliza funcția CInt în Excel VBA.

• Deschideți un registru de lucru Excel.
• Presați Alt+F11 pentru a deschide fereastra VBA Editor.
• Accesați meniul Insert și faceți clic pe modul din opțiunile disponibile.
• Copiați macrourile specificate mai sus în editorul VBA.
• Selectați orice procedură din codurile de mai sus și faceți clic pe comanda „Run” (Execută) sau utilizați comanda rapidă de la tastatură „F5”.

Lista funcțiilor VBA:

Vă rugăm să faceți clic pe linkul de mai jos pentru a vă întoarce să vedeți întreaga listă de funcții VBA.

Funcții de conversie a tipurilor de date VBA Lista de funcții VBA

.