Az egész egy olyan adattípus a VBA-ban, amelyet bármely változónak megadnak az egész értékek megőrzéséhez. 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 követnie kell az adattípusnak a változókhoz való hozzárendelésével. Számos adattípussal dolgozunk, é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 „Integer” 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 egész számok, amelyek lehetnek pozitív, negatív és nulla, de nem töredékes 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.
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, egy egész szám csak egész számokat tartalmazhat, nem pedig tört számokat. 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: 500 értéket rendeljen 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 az F5 billentyűvel vagy manuálisan futtatjuk a kódot, 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. Ezután az -500 értéket is megjeleníti az üzenetmezőben.
3. példa
Amint azt a VBA-nak elmondtam, az Egész szám adattípus csak egész számokat tartalmazhat, nem olyan 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. Nézze meg például 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.
- Az összes tört számot, amely kisebb, mint 0,5, lefelé kerekítjük a legközelebbi egész számra. Például 2,456 = 2, 45,475 = 45.
- Az összes tört számot, amely nagyobb, mint 0,5, 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-ra változik.
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 többet bármi felfelé kerekít a következő egész számra.
Az egész adattípus korlátai az Excel VBA-ban
Túlcsordulási hiba: Az egész adattípusnak jól kell működnie, 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.
Nézze meg például 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 egészében ismerem az egész szám adattípust, tudom, hogy nem működik, mert az egész adattípus nem képes többet megtartani, mint 32767.
Futtassuk a kódot manuálisan vagy az F5 billentyűn keresztül, é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. Tegyük fel, hogy ezeknél a számoknál több hozzárendelt szám túlcsordulási hibát mutat.
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 futtatom a futtatás opcióval vagy manuálisan, é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.
