VBA CInt -funktio

, Author

VBA CInt -funktion tarkoitus:

VBA CInt -funktio luokitellaan tietotyypin muunnosfunktioksi. Se on sisäänrakennettu funktio Excel VBA:ssa. Tämä VBA CInt -funktio muuntaa lausekkeen Integer-tietotyypiksi.
Tätä funktiota voidaan käyttää joko proseduurissa tai funktiossa Excelin VBA-editori-ikkunassa. Voimme käyttää tätä VBA CInt -funktiota kuinka monta kertaa tahansa monessa menettelyssä tai funktiossa. Seuraavassa osassa opit monia aiheita. Kuten mikä on CInt-funktion syntaksi ja parametrit, missä voimme käyttää tätä VBA CInt -funktiota ja sen reaaliaikaisia esimerkkejä.

VBA:n CInt-funktion syntaksi:

VBA:n CInt-funktion syntaksi on

CInt(Expression)

CInt-funktio palauttaa kokonaislukutyyppisen datan arvon.

Parametrit tai argumentit:

CInt-funktiolla on yksi argumentti Excelin VBA:ssa.
jossa
Expression:Se on pakollinen argumentti. Lauseke-argumentti edustaa numeerista arvoa tai merkkijonoa. Sitä käytetään arvon muuntamiseen kokonaislukuarvoksi.

Missä voimme soveltaa tai käyttää VBA:n CInt-funktiota?

Voidaan käyttää tätä CInt-funktiota VBA:ssa MS Office 365:ssä, MS Excel 2016:ssa, MS Excel 2013:ssa, MS Excel 2011:ssä, Excel 2010:ssä, Excel 2007:ssä, Excel 2003:ssa, Macille Excel 2016:ssa, Macille Excel 2011:ssä, Excel Online:ssä, iPhonelle Excelissä, iPadille Excelissä Excelissä Android-tablettien Excel-ohjelmassa ja Android-mobiililaitteille Excelissä.

Esimerkki 1: Muunna merkkijono(100) kokonaislukutietotyypiksi

Tässä on yksinkertainen esimerkki VBA:n CInt-funktiosta. Tässä alla olevassa esimerkissä määritetty lauseke(100) muunnetaan intger-tyyppiseksi arvoksi.

'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

Tulos:
VBA CInt -funktio

Esimerkki 2: Muunna arvo(12345.678) kokonaislukutyyppiseksi tietotyypiksi

Tässä on yksinkertainen esimerkki VBA CInt -funktiosta. Tässä alla olevassa esimerkissä määritetty lauseke(12345.678) muunnetaan intger-tyyppiseksi arvoksi.

'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

Tulos: Tässä on kuvakaappaus toisen esimerkin tulosteesta.
VBA CInt -funktio

Esimerkki 3: Muunna arvo(40000) kokonaislukutietotyypiksi (palauttaa ylivuotovirheen)

Tässä on yksinkertainen esimerkki VBA CInt -funktiosta. Tämä alla olevassa esimerkissä määritetty lauseke(40000) muunnetaan intger-tyyppiseksi arvoksi. Se palauttaa Overflow-virheen. Arvo 40 000 on suurempi kuin 32 767. Kokonaislukuarvon pitäisi olla välillä -32,768-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: Tässä on kuvakaappaus kolmannen esimerkin tulosteesta.
VBA Runtime Overflow Error

Esimerkki 4: Muunna merkkijono(Test) kokonaislukutietotyypiksi (Palauttaa Type mismatch Error)

Tässä on yksinkertainen esimerkki VBA:n CInt-funktiosta. Tämä alla olevassa esimerkissä määritetty lauseke(Test) muunnetaan intger-tyyppiseksi arvoksi. Se palauttaa 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: Tässä on kuvakaappaus neljännen esimerkin tulosteesta.
VBA Runtime Overflow Error

Ohjeita makrokoodien käyttämiseen

Tässä ovat vaiheittaiset ohjeet CInt-funktion käyttämiseen Excel VBA:ssa.

  • Avaa Excel-työkirja.
  • Avaa VBA-editori-ikkuna painamalla Alt+F11.
  • Mene Insert-valikkoon ja napsauta käytettävissä olevista vaihtoehdoista moduulia.
  • Kopioi edellä määritetyt makrot VBA-editoriin.
  • Valitse jokin menettely yllä olevista koodeista ja napsauta ’Suorita’-komentoa tai käytä näppäimistön pikanäppäintä ’F5’.

Luettelo VBA-toiminnoista:

Klikkaa alla olevaa linkkiä palataksesi takaisin katsomaan kaikkia VBA-toimintojen luetteloa.

VBA-tietotyypin muunnostoiminnot Luettelo VBA-toiminnoista

.

Vastaa

Sähköpostiosoitettasi ei julkaista.