Celé číslo je dátový typ vo VBA, ktorý sa dáva akejkoľvek premennej na uchovanie celočíselných hodnôt, obmedzenia alebo hranatá zátvorka pre počet celočíselných premenných, ktoré môžu obsahovať, sú podobné vo VBA ako v iných jazykoch, ľubovoľná premenná je definovaná ako celé číslo premenná pomocou príkazu DIM alebo kľúčového slova vo VBA.
Celé číslo Excel VBA
Dátové typy sú také dôležité v akomkoľvek kódovacom jazyku, pretože za deklaráciou premennej by malo nasledovať priradenie dátového typu k týmto premenným. Máme niekoľko dátových typov, s ktorými môžeme pracovať a každý dátový typ má so sebou spojené výhody a nevýhody. Keď deklarujeme premenné, je dôležité poznať podrobnosti o konkrétnom dátovom type. Toto je článok venovaný dátovému typu „Celé číslo“ vo VBA. Ukážeme vám kompletný obraz dátového typu „Celé číslo“.
Čo je celočíselný dátový typ?
Celé čísla sú celé čísla, ktoré môžu byť kladné, záporné a nulové, ale nie zlomkové číslo. V kontexte VBA je „Integer“ dátový typ, ktorý priradíme premenným. Je to číselný údajový typ, ktorý môže obsahovať celé čísla bez desatinných miest. Celé číslo dátového typu 2 bajty úložiska, čo je polovica dátového typu VBA LONG, tj 4 bajty.
Príklady dátového typu Integer VBA Integer
Ďalej uvádzame príklady dátového typu Celé číslo VBA.
Tu si môžete stiahnuť túto šablónu údajového typu pre celé číslo VBA - Šablóna údajového typu pre celé číslo VBAPríklad č
Keď deklarujeme premennú, je potrebné jej priradiť dátový typ a celé číslo z nich, ktoré bežne používajú všetci používatelia na základe požiadaviek.
Ako som povedal, celé číslo môže obsahovať iba celé čísla, nie zlomkové čísla. Podľa nasledujúcich pokynov nájdete príklad celočíselného údajového typu VBA.
Krok 1: Deklarujte premennú ako celé číslo.
Kód:
Sub Integer_Example () Dim k As Integer End Sub
Krok 2: Priraďte hodnotu 500 premennej „k“.
Kód:
Sub Integer_Example1 () Dim k As Integer k = 500 End Sub
Krok 3: Zobrazte hodnotu v okne správy VBA.
Kód:
Sub Integer_Example1 () Dim k As Integer k = 500 MsgBox k End Sub
Keď spustíme kód pomocou klávesu F5 alebo manuálne, uvidíme v okne správy 500.
Príklad č
Teraz premennej “k” priradím hodnotu ako -500.
Kód:
Sub Integer_Example2 () Dim k As Integer k = -500 MsgBox k End Sub
Spustite tento kód manuálne alebo stlačte kláves F5 a v poli so správou tiež zobrazí hodnotu -500.
Príklad č
Ako som povedal, dátový typ VBA Integer môže obsahovať iba celé čísla, nie zlomkové čísla ako 25.655 alebo 47.145.
Pokúsim sa však priradiť číslo zlomku údajovému typu VBA Integer. Napríklad si pozrite nasledujúci kód.
Kód:
Sub Integer_Example3 () Dim k As Integer k = 85,456 MsgBox k End Sub
Premennej „k“ som priradil 85 456. Spustím tento kód VBA, aby som zistil, aký je výsledok.
- Výsledok vrátil ako 85, aj keď som priradil hodnotu čísla zlomku. Je to kvôli tomu, že VBA zaokrúhľuje čísla zlomkov na najbližšie celé číslo.
- Všetky čísla zlomkov, ktoré sú menšie ako 0,5, sa zaokrúhlia nadol na najbližšie celé číslo. Napríklad 2,456 = 2, 45,475 = 45.
- Všetky čísla zlomkov, ktoré sú väčšie ako 0,5, sa zaokrúhlia na najbližšie celé číslo nahor. Napríklad 10,56 = 11, 14,779 = 15.
Ak sa chcete znova pozrieť na celé číslo zaokrúhľovania, nechajte hodnotu „k“ na 85,58.
Kód:
Sub Integer_Example3 () Dim k As Integer k = 85,58 MsgBox k End Sub
Keď spustím tento kód pomocou klávesu F5 alebo manuálne, vráti sa 86, pretože čokoľvek viac ako 0,5 sa zaokrúhli nahor na ďalšie celé číslo.
Obmedzenia celočíselného dátového typu v programe Excel VBA
Chyba pretečenia: Celý typ údajov by mal fungovať dobre, pokiaľ je priradená hodnota medzi -32768 až 32767. V okamihu, keď prekročí limit na ktorejkoľvek strane, spôsobí vám chybu.
Napríklad si pozrite nasledujúci kód.
Kód:
Sub Integer_Example4 () Dim k As Integer k = 40000 MsgBox k End Sub
Premennej “k” som priradil hodnotu 40000.
Pretože mám úplné informácie o celočíselnom dátovom type, určite viem, že to nefunguje, pretože celočíselný údajový typ nemôže obsahovať hodnotu viac ako 32767.
Spustíme kód ručne alebo pomocou klávesu F5 a uvidíme, čo sa stane.
Ojoj !!!
Chybu som dostal ako „pretečenie“, pretože dátový typ Integer nemôže obsahovať nič viac ako 32767 pre kladné čísla a -32768 pre záporné čísla.
Chyba nezhody typu: Celé dáta môžu obsahovať iba číselné hodnoty v rozmedzí -32768 až 32767. Ak ľubovoľné číslo priradené viac ako tieto čísla, zobrazí sa chyba pretečenia.
Teraz sa mu pokúsim priradiť textové alebo reťazcové hodnoty. V nasledujúcom príklade kódu som priradil hodnotu ako „Hello“.
Kód:
Sub Integer_Example4 () Dim k As Integer k = "Hello" MsgBox k End Sub
Tento kód spustím pomocou možnosti spustenia alebo manuálne a uvidím, čo sa stane.
Zobrazuje chybu ako „Nesúlad typov“, pretože nemôžeme priradiť textovú hodnotu premennej „celočíselný údajový typ“.