Vsebina

# Funkcija Round [VBA]

Zaokroži številsko vrednost na navedeno število decimalk.

To konstanto, funkcijo ali predmet omogočimo z ukazom Option VBASupport 1, ki ga moramo vstaviti pred izvedljivo programsko kodo v modulu.

Ta funkcija implementira pravilo zaokrožanja, znano tudi kot »zaokroži-na-sodo«. S tem pravilom se, ko je razlika med številom za zaokroževanje in njemu najbližjim celim številom enaka 0,5, število zaokroži na najbližjo sodo število. Glejte primere spodaj, da izveste več o tem pravilu.

Bodite pozorni, saj funkcija VBA Round deluje drugače kot funkcija LibreOffice Calc Round. V programu Calc se, če je razlika med številom za zaokroževanjem in najbližjim celim številom natanko 0,5, število zaokroži navzgor. Tako se v Calcu število 2,5 zaokroži na 3, z uporabo funkcije VBA Round pa se ista vrednost zaokroži na 2 zaradi pravila »zaokroži-na-sodo«.

### Skladnja:

Round(expression [,numdecimalplaces])

### Vrnjena vrsta:

Double

### Parametri:

expression: numeričen izraz, ki bo zaokrožen.

numdecimalplaces je neobvezen argument, ki določa število značilnih števk, na katere želimo zaokrožiti vrnjeno vrednost. Privzeta vrednost je 0.

### Kode napak:

5 Neveljaven klic procedure

### Primer:

        Option VBASupport 1
        Sub Example_Round
            Dim r
            r = Pi
            print r ' 3,14159265358979
            print Round(r, 5) ' 3,14159
            r = exp(1)
            print r ' 2,71828182845904
            print Round(r) ' 3
        End Sub

Naslednji primeri ilustrirajo pravilo »zaokroži-na-sodo«:

        ' Zaokrožanje na najbližje celo število, brez decimalk (decimalplaces = 0)
        MsgBox Round(3.5) ' 4
        MsgBox Round(4.5) ' 4
        MsgBox Round(5.5) ' 6
        MsgBox Round(6.5) ' 6
        ' Zaokrožanje z 2 decimalkama (decimalplaces = 2)
        MsgBox Round(1.555, 2) ' 1.56
        MsgBox Round(1.565, 2) ' 1.56
        MsgBox Round(1.575, 2) ' 1.58
        MsgBox Round(1.585, 2) ' 1.58

Podobne teme

Funkcija ROUND v programu Calc

Matematične funkcije VBA

Podprite nas!