Cijeli broj je vrsta podataka u VBA koja se daje bilo kojoj varijabli koja sadrži cjelobrojne vrijednosti, ograničenja ili zagrada za broj cjelobrojne varijable koja je slična u VBA onima koje imaju drugi jezici, bilo koja varijabla definira se kao cijela varijabla pomoću DIM izraza ili ključne riječi u VBA.
Excel VBA Integer
Tipovi podataka toliko su važni u bilo kojem kodnom jeziku jer bi nakon sve deklaracije varijabli trebao slijediti tip podataka koji dodjeljuje tim varijablama. Imamo nekoliko vrsta podataka s kojima radimo, a svaka vrsta podataka ima svoje prednosti i nedostatke povezane s njom. Kada deklariramo varijable, važno je znati detalje o određenom tipu podataka. Ovo je članak posvećen tipu podataka "Integer" u VBA. Pokazat ćemo vam cjelovitu sliku tipa podataka "Integer".
Što je cjeloviti tip podataka?
Cijeli brojevi su čitavi brojevi, koji mogu biti pozitivni, negativni i nula, ali ne i razlomak. U kontekstu VBA, "Integer" je vrsta podataka koju dodjeljujemo varijablama. To je numerički tip podataka koji može sadržavati cijele brojeve bez decimalnih mjesta. Cjelobrojni tip podataka 2 bajta memorije, što je polovica VBA LONG tipa podataka, tj. 4 bajta.
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba.png.webp)
Primjeri cjelovitog tipa podataka programa Excel VBA
Ispod su primjeri tipa VBA integrirani podaci.
Primjer # 1
Kada deklariramo varijablu, potrebno joj je dodijeliti tip podataka i cijeli broj jedne od njih, što svi korisnici obično koriste na temelju zahtjeva.
Kao što sam rekao, cijeli broj može sadržavati samo cijele brojeve, a ne bilo koje dijelove. Slijedite korake u nastavku da biste vidjeli primjer VBA cjelovitog tipa podataka.
Korak 1: Proglasite varijablu kao Integer.
Kodirati:
Sub Integer_Example () Dim k As Integer End Sub
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba_2.png.webp)
Korak 2: Promjenjivoj "k" dodijelite vrijednost 500
Kodirati:
Sub Integer_Example1 () Dim k As Integer k = 500 Kraj Sub
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba_3.png.webp)
Korak 3: Prikažite vrijednost u okviru VBA poruke.
Kodirati:
Sub Integer_Example1 () Dim k As Integer k = 500 MsgBox k End Sub
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba_4.png.webp)
Kada kôd pokrenemo pomoću tipke F5 ili ručno, u okviru s porukom možemo vidjeti 500.
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba.gif)
Primjer # 2
Sada ću varijabli "k" dodijeliti vrijednost -500
Kodirati:
Sub Integer_Example2 () Dim k As Integer k = -500 MsgBox k End Sub
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba_5.png.webp)
Pokrenite ovaj kod ručno ili pritisnite F5. Zatim će u okviru za poruke prikazati i vrijednost -500.
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba_2.gif)
Primjer # 3
Kao što sam rekao VBA, vrsta podataka Integer može sadržavati samo cijele brojeve, a ne brojeve razlomaka poput 25.655 ili 47.145.
Međutim, pokušat ću dodijeliti broj razlomka tipu podataka VBA Integer. Na primjer, pogledajte donji kod.
Kodirati:
Sub Integer_Example3 () Dim k As Integer k = 85.456 MsgBox k End Sub
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba_6.png.webp)
Varijabli "k" dodijelio sam 85.456 Pokrenut ću ovaj VBA kôd da vidim kakav je rezultat.
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba_7.png.webp)
- Rezultat je vratio kao 85, iako sam dodijelio vrijednost broja razlomka. To je zbog VBA zaokruživanja brojeva razlomaka na najbliži cijeli broj.
- Svi brojevi razlomaka, koji su manji od 0,5, zaokružit će se prema dolje na najbliži cijeli broj. Za primjer 2,456 = 2, 45,475 = 45.
- Svi brojevi razlomaka, koji su veći od 0,5, zaokružit će se na najbliži cijeli broj. Za primjer 10,56 = 11, 14,789 = 15.
Da bismo još jednom pogledali zaokruženi cijeli broj, vrijednost "k" iznosi 85,58.
Kodirati:
Sub Integer_Example3 () Dim k As Integer k = 85,58 MsgBox k End Sub
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba_8.png.webp)
Kad pokrenem ovaj kôd pomoću tipke F5 ili ručno, vratit će se 86 jer će se sve više od 0,5 zaokružiti na sljedeći cijeli broj.
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba_9.png.webp)
Ograničenja cjelovitog tipa podataka u programu Excel VBA
Pogreška prelijevanja: Cjelobrojni tip podataka trebao bi raditi u redu dok je dodijeljena vrijednost između -32768 i 32767. U trenutku kad prijeđe ograničenje s obje strane, uzrokovat će vam pogrešku.
Na primjer, pogledajte donji kod.
Kodirati:
Sub Integer_Example4 () Dim k As Integer k = 40000 MsgBox k End Sub
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba_10.png.webp)
Varijabli "k" dodijelio sam vrijednost 40000
Budući da sigurno imam cjelovito znanje o cjelovitom tipu podataka, znam da to ne funkcionira jer cjelobrojni tip podataka ne može sadržavati vrijednost veću od 32767.
Pokrenimo kod ručno ili preko tipke F5 i vidimo što će se dogoditi.
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba_3.gif)
Ups !!!
Dobio sam pogrešku kao "Prelijevanje", jer vrsta podataka Integer ne može sadržavati ništa više od 32767 za pozitivne brojeve i -32768 za negativne brojeve.
Pogreška neusklađenosti tipa: Cjelobrojni podaci mogu sadržavati samo numeričke vrijednosti između -32768 i 32767. Pretpostavimo da će bilo koji broj dodijeljen više od ovih brojeva prikazati pogrešku prelijevanja.
Sad ću mu pokušati dodijeliti vrijednosti teksta ili niza. U donjem primjeru koda dodijelio sam vrijednost kao "Zdravo".
Kodirati:
Sub Integer_Example4 () Dim k As Integer k = "Hello" MsgBox k End Sub
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba_11.png.webp)
Pokrenut ću ovaj kod kroz opciju pokretanja ili ručno i vidjeti što će se dogoditi.
![](https://cdn.know-base.net/7599388/vba_integer_data_type_complete_guide_to_use_integer_data_type_in_vba_4.gif)
Prikazuje pogrešku kao "Nepodudaranje tipa", jer varijabli "cijeli broj podataka" ne možemo dodijeliti tekstualnu vrijednost.