seychellesartprojects.org

Celé číslo je datový typ ve VBA, který je dán jakékoli proměnné, která obsahuje celočíselné hodnoty, omezení nebo závorka pro počet celočíselných proměnných, které mohou obsahovat, jsou podobné ve VBA jako u jiných jazyků, jakákoli proměnná je definována jako celé proměnná pomocí příkazu DIM nebo klíčového slova ve VBA.

Celé číslo aplikace Excel VBA

Datové typy jsou v každém kódovacím jazyce tak důležité, protože za deklarací proměnné by mělo následovat přiřazení datového typu k těmto proměnným. Máme několik datových typů, se kterými můžeme pracovat, a každý datový typ má své vlastní výhody a nevýhody, které jsou s ním spojené. Když deklarujeme proměnné, je důležité znát podrobnosti o konkrétním datovém typu. Toto je článek věnovaný datovému typu „Integer“ ve VBA. Ukážeme vám kompletní obrázek datového typu „Celé číslo“.

Co je datový typ Integer?

Celá čísla jsou celá čísla, která mohou být kladná, záporná a nulová, ale ne zlomková. V kontextu VBA je „Integer“ datový typ, který přiřazujeme proměnným. Jedná se o číselný datový typ, který může obsahovat celá čísla bez desetinných míst. Celé číslo datového typu 2 bajty úložiště, což je polovina datového typu VBA LONG, tj. 4 bajty.

Příklady datového typu Excel VBA Integer

Níže jsou uvedeny příklady datového typu VBA Integer Data.

Tuto šablonu VBA Integer Data Type Template si můžete stáhnout zde - VBA Integer Data Type Template

Příklad č. 1

Když deklarujeme proměnnou, je nutné jí přiřadit datový typ a celé číslo, které běžně používají všichni uživatelé na základě požadavků.

Jak jsem řekl, celé číslo může obsahovat pouze celá čísla, ne žádná zlomková čísla. Podle níže uvedených kroků zobrazíte příklad celočíselného datového typu VBA.

Krok 1: Deklarujte proměnnou jako celé číslo.

Kód:

 Sub Integer_Example () Dim k As Integer End Sub 

Krok 2: Přiřaďte hodnotu 500 proměnné „k“.

Kód:

 Sub Integer_Example1 () Dim k As Integer k = 500 End Sub 

Krok 3: Zobrazit hodnotu v okně se zprávou VBA.

Kód:

 Sub Integer_Example1 () Dim k As Integer k = 500 MsgBox k End Sub 

Když spustíme kód pomocí klávesy F5 nebo ručně, můžeme v okně se zprávou vidět 500.

Příklad č. 2

Nyní proměnné „k“ přiřadím hodnotu jako -500.

Kód:

 Sub Integer_Example2 () Dim k As Integer k = -500 MsgBox k End Sub 

Spusťte tento kód ručně nebo stiskněte klávesu F5, v okně se zprávou se také zobrazí hodnota -500.

Příklad č. 3

Jak jsem řekl, datový typ VBA Integer může obsahovat pouze celá čísla, nikoli zlomková čísla jako 25.655 nebo 47.145.

Pokusím se však přiřadit číslo zlomku datovému typu VBA Integer. Například se podívejte na níže uvedený kód.

Kód:

 Sub Integer_Example3 () Dim k As Integer k = 85,456 MsgBox k End Sub 

Proměnné „k“ jsem přiřadil 85 456. Spustím tento kód VBA, abych zjistil, jaký je výsledek.

• Výsledek vrátil jako 85, i když jsem přidělil hodnotu čísla zlomku. Je to proto, že VBA zaokrouhluje čísla zlomků na nejbližší celé číslo.
• Všechna čísla zlomků, která jsou menší než 0,5, se zaokrouhlí dolů na nejbližší celé číslo. Například 2,456 = 2, 45,475 = 45.
• Všechna čísla zlomků, která jsou větší než 0,5, se zaokrouhlí nahoru na nejbližší celé číslo. Například 10,56 = 11, 14,779 = 15.

Chcete-li se znovu podívat na celé číslo zaokrouhlení, nechte hodnotu „k“ na 85,58.

Kód:

 Sub Integer_Example3 () Dim k As Integer k = 85,58 MsgBox k End Sub 

Když spustím tento kód pomocí klávesy F5 nebo ručně, vrátí se 86, protože cokoli více než 0,5 bude zaokrouhleno nahoru na další celé číslo.

Omezení celočíselného datového typu v aplikaci Excel VBA

Chyba přetečení: Datový typ Integer by měl fungovat dobře, pokud je přiřazená hodnota mezi -32768 až 32767. V okamžiku, kdy překročí limit na obou stranách, způsobí vám chybu.

Například se podívejte na níže uvedený kód.

Kód:

 Sub Integer_Example4 () Dim k As Integer k = 40000 MsgBox k End Sub 

Proměnné „k“ jsem přiřadil hodnotu 40000.

Vzhledem k tomu, že mám úplné znalosti o celočíselném datovém typu, určitě vím, že to nefunguje, protože celočíselný datový typ nemůže mít hodnotu nic víc než 32767.

Spustíme kód ručně nebo pomocí klávesy F5 a uvidíme, co se stane.

Jejda !!!

Dostal jsem chybu jako „Přetečení“, protože datový typ Integer nemůže pojmout nic víc než 32767 pro kladná čísla a -32768 pro záporná čísla.

Chyba neshody typu: Celočíselná data mohou obsahovat pouze číselné hodnoty mezi -32768 až 32767. Pokud jakékoli číslo přiřazené více než tato čísla zobrazí chybu Přetečení.

Nyní se pokusím přiřadit textové nebo řetězcové hodnoty. V níže uvedeném příkladu kódu jsem přiřadil hodnotu jako „Hello“.

Kód:

 Sub Integer_Example4 () Dim k As Integer k = "Hello" MsgBox k End Sub 

Spustím tento kód pomocí možnosti spuštění nebo ručně a uvidím, co se stane.

Zobrazuje chybu jako „Neshoda typu“, protože proměnné „celočíselný datový typ“ nemůžeme přiřadit textovou hodnotu.