VBA egész adattípus | Teljes útmutató az Integer Data Type VBA használatához

Az egész egy olyan adattípus a VBA-ban, amelyet bármely változónak megadnak az egész értékek megtartására. Az egész változó számának korlátozásai vagy zárójelei hasonlóak a VBA-ban, mint más nyelveké, bármely változót egészként definiálunk változó a DIM utasítás vagy kulcsszó segítségével a VBA-ban.

Excel VBA egész szám

Az adattípusok annyira fontosak minden kódoló nyelvben, mert az összes változó deklarációt az adattípus hozzárendelésével kell követni. Több adattípussal dolgozhatunk, és mindegyik adattípusnak megvannak a maga előnyei és hátrányai. A változók deklarálásakor fontos tudni az adott adattípus részleteit. Ez a cikk a VBA „Egész” adattípusának szentelt. Megmutatjuk az „Egész” adattípus teljes képét.

Mi az egész adatok típusa?

Az egész számok olyan egész számok, amelyek lehetnek pozitív, negatív és nulla, de nem tört számok. A VBA kontextusban az „Integer” olyan adattípus, amelyet a változókhoz rendelünk. Ez egy numerikus adattípus, amely egész számokat tartalmazhat tizedespontok nélkül. Egész adattípus 2 bájt tárhely, amely a VBA LONG adattípus fele, azaz 4 bájt.

Példák az Excel VBA egész adattípusára

Az alábbiakban bemutatjuk a VBA egész szám adatait.

Ezt a VBA egész adattípus sablont innen töltheti le - VBA egész szám adattípus sablont

1. példa

Amikor egy változót deklarálunk, hozzá kell rendelni egy adattípust és egész számot, amelyet az összes felhasználó a követelmények alapján általában használ.

Mint mondtam, az egész szám csak egész számokat tartalmazhat, töredékes számokat nem. Kövesse az alábbi lépéseket a VBA egész adattípus példájának megtekintéséhez.

1. lépés: Nyújtsa be a változót egész számnak.

Kód:

 Sub Integer_Példa () Dim k As Integer End Sub 

2. lépés: Rendelje az 500 értéket a „k” változóhoz.

Kód:

 Részinteg__Példa1 () Dim k As Egész szám k = 500 Vége Sub 

3. lépés: Az érték megjelenítése a VBA üzenetmezőben.

Kód:

 Sub Integer_Példa1 () Dim k As Integer k = 500 MsgBox k End Sub 

Amikor a kódot az F5 billentyűvel vagy manuálisan futtatjuk, 500-at láthatunk az üzenetmezőben.

2. példa

Most -500 értéket rendelek a „k” változóhoz.

Kód:

 Sub Integer_Példa2 () Dim k As Integer k = -500 MsgBox k End Sub 

Futtassa ezt a kódot manuálisan, vagy nyomja meg az F5 billentyűt, ekkor az üzenet mezőben megjelenik a -500 értéke is.

3. példa

Mint mondtam, a VBA Integer adattípus csak egész számokat tartalmazhat, nem pedig a tört számokat, mint a 25.655 vagy a 47.145.

Megpróbálom azonban a törtszámot hozzárendelni egy VBA egész szám adattípushoz. Például nézze meg az alábbi kódot.

Kód:

 Sub Integer_Példa3 () Dim k As Integer k = 85.456 MsgBox k End Sub 

85.456 értéket rendeltem a „k” változóhoz. Futtatom ezt a VBA kódot, hogy megnézzem, mi az eredmény.

  • Az eredmény 85-ös volt, annak ellenére, hogy hozzárendeltem a tört szám értékét. Ennek oka, hogy a VBA a törtszámokat kerekíti a legközelebbi egész számra.
  • A 0,5-nél kisebb összes frakciót lefelé kerekítjük a legközelebbi egész számra. Például 2,456 = 2, 45,475 = 45.
  • A 0,5-nél nagyobb összes törzsszámot felfelé kerekítjük a legközelebbi egész számra. Például 10,56 = 11, 14,789 = 15.

Ha még egyszer meg szeretné nézni a kerekített egész számot, akkor a „k” értéke 85,58 lesz.

Kód:

 Sub Integer_Példa3 () Dim k As Integer k = 85.58 MsgBox k End Sub 

Amikor ezt a kódot az F5 billentyűvel vagy manuálisan futtatom, az 86-ot ad vissza, mert 0,5-nél nagyobb értéket felfelé kerekítünk a következő egész számra.

Az integer adattípus korlátai az Excel VBA-ban

Túlcsordulási hiba: Az egész adattípusnak jól kell működnie mindaddig, amíg a hozzárendelt érték -32768 és 32767 között van. Abban a pillanatban, amikor mindkét oldalon átlépi a határt, hibát okoz.

Például nézze meg az alábbi kódot.

Kód:

 Sub Integer_Példa4 () Dim k As Integer k = 40000 MsgBox k End Sub 

A 40000 értéket a „k” változóhoz rendeltem.

Mivel teljes tudással rendelkezem az Egész szám adattípusról, biztos vagyok benne, hogy tudom, hogy nem működik, mert az egész adattípus nem képes többet tartani az értéknél, mint 32767.

Futtassuk a kódot manuálisan vagy az F5 kulcs segítségével, és nézzük meg, mi történik.

Hoppá !!!

A hibát „Túlcsordulás” néven kaptam, mert az Egész szám adattípus nem tartalmazhat többet, mint 32767 pozitív szám esetén és -32768 negatív szám esetén.

Típus-eltérés hiba: Az egész adatok csak -32768 és 32767 közötti számértékeket tárolhatnak. Ha ezeknél a számoknál többhez rendelt bármely szám túlcsordulási hibát jelenít meg.

Most megpróbálok szöveget vagy karakterláncot rendelni hozzá. Az alábbi példakódban az értéket „Hello” -nak rendeltem.

Kód:

 Sub Integer_Példa4 () Dim k As Integer k = "Hello" MsgBox k End Sub 

Ezt a kódot futtatással vagy manuálisan futtatom, és megnézem, mi történik.

A hibát „Type mismatch” néven mutatja, mert nem rendelhetünk szöveges értéket az „egész szám adattípus” változóhoz.