VBA INT - Hvordan bruker jeg heltalfunksjon i VBA Excel?

Excel VBA INT (Integer) -funksjon

VBA INT er en innebygd funksjon som brukes til å gi oss bare hele tall av et tall gitt oss en inngang, denne funksjonen brukes i de dataene hvis desimaldel ikke påvirker dataene så mye for å lette beregningene eller analysene vi bruker INT-funksjon for å få bare heltallverdiene.

Denne funksjonen er tilgjengelig både i regnearket og i VBA. Heltallfunksjon runder et spesifikt tall ned til nærmeste heltall.

VBA Int-funksjonen kan brukes i underprosedyre og funksjonsprosedyre. Ta en titt på syntaksen til INT-funksjonen i VBA.

Det har bare ett argument å levere, dvs. nummer.

  • Tallet er tallet vi prøver å konvertere til INTEGER-nummer. Når tallet er gitt, avrunder INT-funksjonen det til nærmeste heltall.

For eksempel, hvis det medfølgende nummeret er 68,54, rundes Excel VBA Int-funksjonen ned til 68, som er mot null. Hvis det medfølgende nummeret er -68,54, avrundes INT-funksjonen tallet til 69, som er borte fra null.

Hvordan bruker jeg VBA INT-funksjonen?

Eksempel 1

Se nå på det enkle eksemplet på “INT” -funksjonen i VBA. La oss utføre oppgaven med å runde ned tallet 84.55 til nærmeste heltall.

Trinn 1: Start delprosedyren.

Trinn 2: Erklær variabelen som heltall .

Kode:

Sub INT_Example1 () Dim K Som Integer End Sub

Trinn 3: Tilordne nå formelen til variabelen “ k ” ved å bruke INT-funksjonen.

Kode:

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

Trinn 4: Oppgi tallet som 84.55 .

Merk: Siden det er et tall, trenger vi ikke å gi dobbelt anførselstegn.

Kode:

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

Trinn 5: Send nå resultatet av variabelen i VBA-meldingsboksen.

Kode:

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

Ok, la oss kjøre koden og se hva som skjer.

Så resultatet er 84, og det avrundes ned til nærmeste heltall.

Eksempel 2

Nå med samme tall med negativt tegn, vil vi prøve å konvertere til nærmeste heltall. Nedenfor er koden med et negativt tegn.

Kode:

Sub INT_Example2 () Dim k As Integer k = Int (-84.55) 'Negativt tall med INT-funksjon MsgBox k End Sub

Når jeg kjører denne koden, har den avrundet tallet til -85 .

Eksempel 3 - Trekk ut datodelen fra dato og tid

Få ganger i karrieren har jeg møtt scenariet med å trekke ut dato og tid separat fra kombinasjonen av dato og tid.

Se for eksempel på dataene nedenfor for Dato og tid.

Hvordan trekker du ut datodel og tid?

Først må vi trekke ut datodelen. For dette, la oss bruke INT-funksjonen. Koden nedenfor vil trekke ut DATE-delen fra dataene ovenfor.

Kode:

Under INT_eksempel2 () Dim k som heltall For k = 2 til 12 celler (k, 2). Verdi = Int (celler (k, 1). Verdi) 'Dette vil trekke ut datoen til den andre kolonnen Celler (k, 3). Verdi = celler (k, 1). Verdi - celler (k, 2). Verdi 'Dette vil trekke ut tid til tredje kolonne Neste k Slutt sub

Kjør denne koden. Du kan få resultatet som nedenfor (hvis formateringen ikke brukes).

I datakolonnen bruker du formateringen som “DD-MMM-ÅÅÅÅ”, og for tidskolonnen bruker du datoformatet i Excel som “HH: MM: SS AM / PM”

Interessante artikler...