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 het gegevenstype dat aan die variabelen is toegewezen. We werken met verschillende gegevenstypen 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 opslagruimte, wat 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.
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 een geheel getal 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 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. Vervolgens wordt in het berichtvenster ook de waarde -500 weergegeven.
Voorbeeld # 3
Zoals ik VBA vertelde, kan het gegevenstype 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 bijvoorbeeld 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, ook al heb ik de waarde van het breuknummer toegewezen. Dit komt doordat VBA de breuknummers afrondt tot het dichtstbijzijnde gehele getal.
- Alle breuknummers, 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 breuknummers, 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 een keer naar het afrondende 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, zal dit een fout veroorzaken.
Kijk bijvoorbeeld 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 zeker volledige kennis heb van Integer-gegevenstype, weet ik 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. Stel dat elk nummer dat meer dan deze nummers is toegewezen, een overloopfout zal vertonen.
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 door de run-optie of handmatig laten lopen en kijken wat er gebeurt.
Het geeft de fout weer als 'Type komt niet overeen' omdat we geen tekstwaarde kunnen toewijzen aan de variabele 'integer datatype'.
