VBA voor - Kuidas kasutada Exceli VBA ümmargust funktsiooni?

Lang L: none (table-of-contents)

Exceli VBA ümmargune funktsioon

Ümmargune funktsioon VBA-s on matemaatiline funktsioon, mis, nagu nimigi ütleb, ümardab antud numbri ülespoole või ümardab allapoole konkreetse kümnendkohtade komplektini, mille kasutaja on määranud, kasutab see funktsioon vooru loogikat, mis tähendab, et selleks kulub 5 viide ja viimane number pärast koma on alla 5, siis ümardatakse see alla ja vastupidi.

Numbri saab ümardada kahekohalise kümnendkoha, kolmekohalise kümnendkoha täpsusega või kümnendkohani üldse. Näiteks kui teil on number 5.8697. Kui ümardate numbri kahekohalise kümnendkohani, on see 5,87. Kui ümardate kolme numbrini, ümardatakse see 5,870-ni. Kui soovite ümardada nulli, siis on see 6.-

Panganumbrite korral ümardatakse kõik kümnendkohad, mis on väiksemad kui 0,5, eelmise täisarvuni ja kõik kümnendkohad, mis on suuremad või võrdsed 0,5, ümardatakse järgmise täisarvuni.

Loodan, et olete töölehel kasutanud funktsiooni ROUND. Ka VBA-s saame seda funktsiooni kasutada, kuid meil on nendes funktsioonides erinevus. Nende kahe funktsiooni erinevust näeme hiljem selles artiklis.

Süntaks

Heitke pilk funktsiooni Round süntaksile.

Number: see on number, mida proovime ümardada.

(Numbrite arv pärast koma): mitu numbrit vajate pärast koma.

Näited

Oletame, et teil on number 4.534 ja soovite ümardada kahekohaliseks.

Järgige alltoodud samme.

1. samm: kuulutage muutuja Variantiks.

Kood:

Alavoor_näide1 () Dim K Variant End Sub

2. samm: määrake selle muutuja “ k ” jaoks väärtus funktsiooni ROUND kaudu.

Kood:

Alavoor_näide1 () Mõõt K Variandina K = ümmargune (lõpu alam

3. samm: arv pole midagi, kuid mis on see number, mida proovime ümardada. Sel juhul on arv 4,534

Kood:

Alavoor_näide1 () Mõõt K Variandina K = ümmargune (4,534, alamosa

4. samm: mitu numbrit peame ümardama? Sellisel juhul peame ümardama 2 numbrini .

Kood:

Alavoor_näide1 () Dim K Variandina K = Round (4.534, 2) End Sub

5. samm: kuvage nüüd sõnumikastis VBA muutuja “k” väärtus.

Kood:

Alavoor_näide1 () Dim K Variandina K = Round (4.534, 2) MsgBox K Lõpp Alam

Käivitage see kood ja vaadake, mida me saame.

Saime tulemuseks 4,53, kui ümardasime kahekohaliseks.

Nüüd muudan numbri 4.534 asemel 4.535 . Vaata, mis nüüd juhtub.

Kood:

Alavoor_näide1 () Dim K Variandina K = Round (4.535, 2) MsgBox K End Sub

Nüüd käivitage kood ja vaadake, mis on tulemus.

Saime tulemuseks 4,54, mis on kümnendkohaga suurem kui eelmine väärtus 4,53. Selle põhjuseks on see, et selles näites oleme esitanud numbri nagu 4,535, nii et pärast numbrit 3 on järgmine number 5, seega ümardatakse see järgmiseks numbriks, nii et 3 saab 4.

Nüüd esitan numbri numbriks 2.452678 ja proovin ümardada kolme numbrini.

Kood:

Alavoor_näide2 () Dim K Variandina K = Round (2.452678, 3) MsgBox K End Sub

Tulemuse nägemiseks käivitage see kood.

Tulemuseks on 2.453 .

2,45 2678 Siin on teise kümnendkoha järel olevad numbrid 2678. Pärast numbrit 2 on järgmine number 6, mis on suurem või võrdne 5-ga, seega ümardatakse see järgmise kümnendkohani.

Nüüd kasutan sama numbrit, et ümardada nullini ja vaadata, mis juhtub.

Kood:

Alavoor_näide3 () Dim K Variandina K = Round (2.452678, 0) MsgBox K End Sub

Käivitage kood ja vaadake, mida me saame.

Kuna olen kasutanud ringi nullini, saime tulemuseks 2.

Põhjus, miks saime tulemuseks 2, sest siin on kümnendkoha esimene number 4, mis on väiksem kui 0,5, seega ümardatakse see allapoole.

Erinevus Exceli ja VBA ROUND-funktsiooni vahel

Peamiselt on 2 erinevust.

# 1 - mõlema funktsiooni süntaks:

Kui vaadata mõlema funktsiooni süntaksit, on meil siin erinevus.

Exceli ümmargune süntaks: ümmargune (arv, arvude arv pärast koma)
VBA ümmargune süntaks: ümmargune (arv, (numbrite arv pärast koma))

Excelis on mõlemad argumendid kohustuslikud, kuid VBA-s on teine ​​argument valikuline.

Kui ignoreerite teist argumenti VBA-s, võtab see vaikimisi argumendi nulliks, nii et saame kogu arvu.

# 2 - tulemused:

Nende kahe funktsiooni tulemused on erinevad. Allpool on toodud mõned näited

Huvitavad Artiklid...