VBA-geheel getal

Een geheel getal is een gegevenstype in VBA dat aan elke variabele wordt gegeven om gehele waarden vast te houden, de beperkingen of de haakjes voor het aantal variabelen dat een geheel getal kan bevatten is vergelijkbaar in VBA als die van andere talen, elke variabele wordt gedefinieerd als geheel getal variabele met behulp van de DIM-instructie of het trefwoord in VBA.

Excel VBA-geheel getal

Gegevenstypen zijn zo belangrijk in elke codeertaal omdat alle variabeldeclaratie moet worden gevolgd door een gegevenstype dat aan die variabelen wordt toegewezen. We hebben verschillende gegevenstypen om mee te werken en elk gegevenstype heeft zijn eigen voor- en nadelen. Wanneer we variabelen declareren, is het belangrijk om details over het specifieke gegevenstype te kennen. Dit is het artikel gewijd aan het gegevenstype "Geheel getal" in VBA. We laten u het volledige beeld zien van het gegevenstype "Integer".

Wat is het gegevenstype Integer?

Gehele getallen zijn gehele getallen die positief, negatief en nul kunnen zijn, maar geen fractioneel getal. In de VBA-context is "Geheel getal" een gegevenstype dat we aan de variabelen toewijzen. Het is een numeriek gegevenstype dat hele getallen kan bevatten zonder decimale posities. Geheel getal datatype 2 bytes opslag die de helft is van het VBA LONG-datatype, dwz 4 bytes.

Voorbeelden van Excel VBA integer gegevenstype

Hieronder staan ​​de voorbeelden van het gegevenstype VBA Integer.

U kunt deze VBA Integer Data Type Template hier downloaden - VBA Integer Data Type Template

Voorbeeld 1

Wanneer we een variabele declareren, is het noodzakelijk om er een gegevenstype aan toe te wijzen en een integer getal, dat gewoonlijk door alle gebruikers wordt gebruikt op basis van de vereisten.

Zoals ik al zei, kan integer alleen hele getallen bevatten, geen fractionele getallen. Volg de onderstaande stappen om het voorbeeld van een VBA integer-gegevenstype te zien.

Stap 1: Declareer de variabele als geheel getal.

Code:

 Sub Integer_Example () Dim k As Integer End Sub 

Stap 2: Wijs de waarde van 500 toe aan de variabele “k”.

Code:

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

Stap 3: toon de waarde in het VBA-berichtvenster.

Code:

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

Wanneer we de code uitvoeren met de F5-toets of handmatig, zien we 500 in het berichtvenster.

Voorbeeld # 2

Nu zal ik de waarde als -500 toewijzen aan de variabele "k".

Code:

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

Voer deze code handmatig uit of druk op F5, het zal ook de waarde van -500 in het berichtvenster tonen.

Voorbeeld # 3

Zoals ik al zei, kan het gegevenstype VBA Integer alleen hele getallen bevatten, geen breuken zoals 25.655 of 47.145.

Ik zal echter proberen het breuknummer toe te wijzen aan een VBA Integer-gegevenstype. Kijk voor een voorbeeld naar de onderstaande code.

Code:

 Sub Integer_Example3 () Dim k As Integer k = 85.456 MsgBox k End Sub 

Ik heb 85.456 toegewezen aan de variabele "k". Ik zal deze VBA-code uitvoeren om te zien wat het resultaat is.

  • Het heeft het resultaat geretourneerd als 85, hoewel ik de waarde van het breuknummer heb toegewezen. Dit komt doordat VBA de breuknummers afrondt tot het dichtstbijzijnde gehele getal.
  • Alle breuken die kleiner zijn dan 0,5, worden naar beneden afgerond op het dichtstbijzijnde gehele getal. Voor een voorbeeld 2.456 = 2, 45.475 = 45.
  • Alle breuken die groter zijn dan 0,5 worden naar boven afgerond op het dichtstbijzijnde gehele getal. Voor een voorbeeld 10,56 = 11, 14,789 = 15.

Om nog eens naar het afronden geheel getal te kijken, laat de waarde van "k" tot 85,58.

Code:

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

Wanneer ik deze code uitvoer met de F5-toets of handmatig, wordt 86 geretourneerd, omdat iets meer dan 0,5 naar boven wordt afgerond naar het volgende gehele getal.

Beperkingen van het gegevenstype geheel getal in Excel VBA

Overloopfout: het gegevenstype geheel getal zou goed moeten werken zolang de toegewezen waarde tussen -32768 en 32767 ligt. Op het moment dat het de limiet aan een van beide zijden overschrijdt, krijgt u een foutmelding.

Kijk voor een voorbeeld naar de onderstaande code.

Code:

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

Ik heb de waarde van 40000 toegewezen aan de variabele "k".

Omdat ik volledige kennis heb van het gegevenstype geheel getal, weet ik zeker dat het niet werkt omdat het gegevenstype integer de waarde niet meer kan bevatten dan 32767.

Laten we de code handmatig of via de F5-toets uitvoeren en kijken wat er gebeurt.

Oeps !!!

Ik kreeg de foutmelding "Overflow" omdat het gegevenstype Integer niet meer kan bevatten dan 32767 voor positieve getallen en -32768 voor negatieve getallen.

Type komt niet overeen Fout: gegevens met een geheel getal kunnen alleen numerieke waarden tussen -32768 en 32767 bevatten. Als een willekeurig nummer meer dan deze nummers is toegewezen, wordt een overloopfout weergegeven.

Nu zal ik proberen er tekst- of tekenreekswaarden aan toe te wijzen. In de onderstaande voorbeeldcode heb ik de waarde toegewezen als "Hallo".

Code:

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

Ik zal deze code uitvoeren via de optie Uitvoeren of handmatig en kijken wat er gebeurt.

Het toont de fout als "Type mismatch" omdat we geen tekstwaarde kunnen toewijzen aan de variabele "integer data type".