Et heltall er en datatype i VBA som er gitt til en hvilken som helst variabel for å holde heltallverdier, begrensningene eller braketten for antallet til en heltallvariabel kan holde er lik i VBA som de for andre språk, hvilken som helst variabel er definert som heltall variabel ved bruk av DIM-setningen eller nøkkelordet i VBA.
Excel VBA Heltall
Datatyper er så viktige i ethvert kodingspråk fordi all variabelerklæringen skal følges av datatypen som tildeles disse variablene. Vi har flere datatyper å jobbe med, og hver datatype har sine egne fordeler og ulemper forbundet med den. Når vi erklærer variabler er det viktig å vite detaljer om den spesifikke datatypen. Dette er artikkelen dedikert til "Integer" datatypen i VBA. Vi viser deg det komplette bildet av datatypen "Heltall".
Hva er helhetens datatype?
Heltall er hele tall, som kan være positive, negative og null, men ikke et brøktal. I VBA-sammenheng er "Heltall" en datatype vi tilordner variablene. Det er en numerisk datatype som kan holde hele tall uten desimalposisjoner. Heltall datatype 2 byte lagring, som er halvparten av VBA LANG datatype, dvs. 4 byte.
Eksempler på Excel VBA Integer Data Type
Nedenfor er eksemplene på VBA Integer Data-typen.
Eksempel 1
Når vi deklarerer en variabel, er det nødvendig å tilordne en datatype til den og heltall en av dem, som ofte brukes av alle brukerne basert på kravene.
Som sagt kan et helt tall bare inneholde hele tall, ikke noen brøktal. Følg trinnene nedenfor for å se eksemplet på en VBA heltall datatype.
Trinn 1: Erklær variabelen som heltall.
Kode:
Sub Integer_Example () Dim k Som Integer End Sub
Trinn 2: Tildel verdien 500 til variabelen “k.”
Kode:
Sub Integer_Example1 () Dim k As Integer k = 500 End Sub
Trinn 3: Vis verdien i VBA-meldingsboksen.
Kode:
Sub Integer_Example1 () Dim k As Integer k = 500 MsgBox k End Sub
Når vi kjører koden ved hjelp av F5-tasten eller manuelt, kan vi se 500 i meldingsboksen.
Eksempel 2
Nå vil jeg tilordne verdien som -500 til variabelen “k.”
Kode:
Sub Integer_Example2 () Dim k As Integer k = -500 MsgBox k End Sub
Kjør denne koden manuelt eller trykk på F5. Deretter vil den også vise verdien -500 i meldingsboksen.
Eksempel 3
Som jeg fortalte VBA, kan datatypen Integer bare inneholde hele tall, ikke brøknummer som 25.655 eller 47.145.
Imidlertid vil jeg prøve å tilordne brøknummeret til en VBA Integer-datatype. Se for eksempel på koden nedenfor.
Kode:
Sub Integer_Example3 () Dim k As Integer k = 85.456 MsgBox k End Sub
Jeg har tildelt 85.456 til variabelen “k.” Jeg vil kjøre denne VBA-koden for å se hva resultatet er.
- Det har returnert resultatet som 85, selv om jeg har tildelt verdien av brøknummeret. Dette er på grunn av VBA rundt brøkstallene til nærmeste heltall.
- Alle brøkstallene, som er mindre enn 0,5, blir avrundet ned til nærmeste heltall. For eksempel 2.456 = 2, 45.475 = 45.
- Alle brøkstallene, som er større enn 0,5, blir avrundet opp til nærmeste heltall. For eksempel 10,56 = 11, 14,789 = 15.
For å se enda en gang på det samlede helhetsnummeret, kan verdien “k” komme til 85,58.
Kode:
Sub Integer_Example3 () Dim k As Integer k = 85.58 MsgBox k End Sub
Når jeg kjører denne koden ved hjelp av F5-tasten eller manuelt, vil den returnere 86 fordi noe mer enn 0,5 vil bli avrundet til neste heltall.
Begrensninger for heltal datatype i Excel VBA
Overflow Error: Heltalldatatype skal fungere bra så lenge den tildelte verdien er mellom -32768 til 32767. I det øyeblikket den krysser grensen på begge sider, vil det føre til en feil.
Se for eksempel på koden nedenfor.
Kode:
Sub Integer_Example4 () Dim k As Integer k = 40000 MsgBox k End Sub
Jeg har tilordnet verdien 40000 til variabelen “k.”
Siden jeg helt sikkert har fullstendig kunnskap om Integer Data Type, vet jeg at det ikke fungerer fordi heltalldatatype ikke kan inneholde verdien mer enn 32767.
La oss kjøre koden manuelt eller gjennom F5-tasten og se hva som skjer.
Ups !!!
Jeg fikk feilen som "Overflow" fordi datatypen Integer ikke kan inneholde noe mer enn 32767 for positive tall og -32768 for negative tall.
Type Mismatch Error: Heltalldata kan bare inneholde numeriske verdier mellom -32768 til 32767. Anta at et hvilket som helst nummer som er tildelt mer enn disse tallene, viser en overflytningsfeil.
Nå skal jeg prøve å tildele tekst eller strengverdier til den. I koden nedenfor, har jeg tilordnet verdien som "Hei."
Kode:
Sub Integer_Example4 () Dim k As Integer k = "Hello" MsgBox k End Sub
Jeg vil kjøre denne koden gjennom kjøringsalternativet eller manuelt og se hva som skjer.
Det viser feilen som "Type mismatch" fordi vi ikke kan tilordne en tekstverdi til variabelen "heltal datatype."
