Excel VBA Round-funksjon
Rundfunksjon i VBA er en matematisk funksjon som, som navnet selv antyder, runder opp eller avrunder det gitte nummeret til det spesifikke settet med desimaler som er angitt av brukeren, denne funksjonen bruker logikken til runden, selv om det betyr at det tar 5 som referanse og et hvilket som helst tall med siste siffer etter desimal er under 5, så er det rundt og omvendt.
Du kan avrunde et tall til en tosifret desimal, tresifret desimal eller ingen desimal i det hele tatt. For eksempel hvis du har nummeret 5.8697. Hvis du avrunder tallet til en tosifret desimal, blir det 5,87. Hvis du avrunder til tre sifre, vil den rundes til 5.870. Hvis du ønsker å runde til null, vil det være 6.-
I banktall blir alle desimaler som er mindre enn 0,5 avrundet ned til forrige heltall, og alle desimaler som er større enn eller lik 0,5 blir avrundet til neste heltall.
Jeg håper du har brukt RUND-funksjonen i regnearket. Også i VBA kan vi bruke denne funksjonen, men vi har en forskjell i disse funksjonene. Vi vil se forskjellen mellom disse to funksjonene senere i denne artikkelen.
Syntaks
Ta en titt på syntaksen til Round-funksjonen.
Antall: Dette er tallet vi prøver å runde.
(Antall sifre etter desimal): Hvor mange sifre du trenger etter desimalverdien.
Eksempler
Anta at du har tallet 4.534, og at du vil avrunde til to sifre.
Følg trinnene nedenfor.
Trinn 1: Deklarer variabelen som variant.
Kode:
Sub Round_Example1 () Dim K Som Variant End Sub
Trinn 2: For denne variabelen " k ", tildel verdien gjennom RUND-funksjonen.
Kode:
Sub Round_Example1 () Dim K Som Variant K = Round (End Sub
Trinn 3: Antall er ingenting, men hva er tallet vi prøver å runde. I dette tilfellet er tallet 4,534
Kode:
Sub Round_Example1 () Dim K Som Variant K = Round (4.534, End Sub
Trinn 4: Hvor mange sifre må vi runde? I dette tilfellet må vi avrunde til to sifre .
Kode:
Sub Round_Example1 () Dim K Som Variant K = Round (4.534, 2) End Sub
Trinn 5: Vis nå variabelen “k” -verdi i meldingsboksen VBA.
Kode:
Sub Round_Example1 () Dim K Som Variant K = Round (4.534, 2) MsgBox K End Sub
Kjør denne koden og se hva vi får.
Vi fikk resultatet 4,53 da vi avrundet til 2 sifre.
Nå skal jeg endre tallet fra 4.534 til 4.535 . Se hva som skjer nå.
Kode:
Sub Round_Example1 () Dim K Som Variant K = Round (4.535, 2) MsgBox K End Sub
Kjør nå koden og se hva resultatet er.
Vi fikk resultatet 4,54, en desimal høyere enn den forrige verdien 4,53. Dette skyldes at vi i dette eksemplet har levert tallet som 4.535, så etter at nummer 3 er neste nummer 5, så det blir avrundet til neste nummer, så 3 blir 4.
Nå vil jeg oppgi nummeret som 2.452678, og jeg vil prøve å avrunde til 3 sifre.
Kode:
Sub Round_Example2 () Dim K Som Variant K = Round (2.452678, 3) MsgBox K End Sub
Kjør denne koden for å se resultatet.
Resultatet er 2.453 .
2,45 2678 Her tall etter 2 nd desimal er 2678. Etter nummer 2, er neste nummer 6, som er større enn eller lik 5, så det er rundet opp til nærmeste desimaltall.
Nå skal jeg bruke det samme tallet til å runde til null og se hva som skjer.
Kode:
Sub Round_Example3 () Dim K Som Variant K = Round (2.452678, 0) MsgBox K End Sub
Kjør koden og se hva vi får.
Siden jeg har brukt runden til null, fikk vi resultatet som 2.
Årsaken til at vi fikk resultatet som 2 fordi her er det desimale første tallet 4, som er mindre enn 0,5, så det er avrundet.
Forskjellen mellom Excel og VBA ROUND-funksjon
Det er hovedsakelig to forskjeller.
# 1 - Syntaks for begge funksjonene:
Hvis du ser på syntaksen til begge funksjonene, har vi en forskjell her.
Excel Round Syntax: Round (Number, Number of Digits After Decimal)
VBA Round Syntax: Round (Number, (Number of Digits After Decimal))
I excel er begge argumentene obligatoriske, men i VBA er det andre argumentet valgfritt.
I VBA, hvis du ignorerer det andre argumentet, tar det standardargumentet som null, så vi får hele tallet.
# 2 - Resultater:
Resultatene gitt av disse to funksjonene er forskjellige. Nedenfor er noen eksempler
