VBA INT - Hoe Integer-functie te gebruiken in VBA Excel?

Inhoudsopgave

Excel VBA INT (geheel getal) functie

Excel VBA INT (geheel getal) functie

VBA INT is een ingebouwde functie die wordt gebruikt om ons alleen het gehele deel van een getal te geven, mits we een invoer hebben, deze functie wordt gebruikt in die gegevens waarvan het decimale deel niet zozeer de gegevens beïnvloedt, maar om de berekeningen of analyse die we gebruiken te vergemakkelijken INT-functie om alleen de gehele getallen op te halen.

Deze functie is zowel beschikbaar met het werkblad als in VBA. De functie Integer rondt een specifiek getal naar beneden af op het dichtstbijzijnde gehele getal.

De VBA Int-functie kan worden gebruikt in Subprocedure en Functieprocedure. Bekijk nu de syntaxis van de INT-functie in VBA.

Het heeft maar één argument om op te geven, namelijk nummer.

Het nummer is het nummer dat we proberen om te zetten in een INTEGER-nummer. Wanneer het nummer is opgegeven, rondt de INT-functie het naar beneden af naar het dichtstbijzijnde gehele getal.

Als het opgegeven getal bijvoorbeeld 68,54 is, rondt de Excel VBA Int-functie naar beneden af naar 68, wat naar nul is. Als het opgegeven getal -68,54 is, heeft de INT-functie het getal afgerond naar 69, wat weg is van nul.

Hoe de VBA INT-functie te gebruiken?

Voorbeeld 1

Bekijk nu het eenvoudige voorbeeld van de "INT" -functie in VBA. Laten we de taak uitvoeren om het getal 84,55 naar beneden af te ronden naar het dichtstbijzijnde gehele getal.

Stap 1: Start de subprocedure.

Stap 2: Declareer de variabele als geheel getal .

Code:

Sub INT_Example1 () Dim K As Integer End Sub

Stap 3: Wijs nu de formule toe aan de variabele “ k ” door de INT-functie toe te passen.

Code:

Sub INT_Example1 () Dim K As Integer K = Int (End Sub

Stap 4: Geef het nummer op als 84.55 .

Opmerking: aangezien het een numeriek getal is, hoeven we geen dubbele aanhalingstekens te gebruiken.

Code:

Sub INT_Example1 () Dim K As Integer K = Int (84.55) End Sub

Stap 5: Geef nu het resultaat van de variabele door in het VBA-berichtvenster.

Code:

Sub INT_Example1 () Dim K As Integer K = Int (84.55) MsgBox K End Sub

Oké, laten we de code uitvoeren en kijken wat er gebeurt.

Het resultaat is dus 84 en wordt naar beneden afgerond op het dichtstbijzijnde gehele getal.

Voorbeeld 2

Nu met hetzelfde getal met het minteken, zullen we proberen om te zetten naar de dichtstbijzijnde gehele waarde. Hieronder staat de code met een minteken.

Code:

Sub INT_Example2 () Dim k As Integer k = Int (-84.55) 'Negatief getal met INT-functie MsgBox k End Sub

Wanneer ik deze code uitvoer, is het getal afgerond op -85 .

Voorbeeld # 3 - Datagedeelte extraheren uit Datum en tijd

Een paar keer in mijn carrière ben ik het scenario tegengekomen om de datum en tijd afzonderlijk te extraheren van de combinatie van datum en tijd.

Bekijk bijvoorbeeld de onderstaande gegevens van Datum en tijd.

Hoe extraheer je datagedeelte en tijd?

Eerst moeten we het datumgedeelte extraheren. Laten we hiervoor de INT-functie toepassen. De onderstaande code haalt het DATUM-gedeelte uit de bovenstaande gegevens.

Code:

Sub INT_Example2 () Dim k As Integer For k = 2 to 12 Cells (k, 2) .Value = Int (Cells (k, 1) .Value) 'Dit zal de datum extraheren naar de tweede kolom Cells (k, 3). Waarde = Cellen (k, 1). Waarde - Cellen (k, 2). Waarde 'Dit zal de tijd extraheren naar de derde kolom Volgende k End Sub

Voer deze code uit. U kunt het resultaat krijgen zoals hieronder (als de opmaak niet wordt toegepast).