Vba: waarden afronden op 2 decimalen

U kunt de volgende methoden gebruiken om waarden af te ronden op 2 decimalen met behulp van VBA:

Methode 1: Rond een waarde af op 2 decimalen

 Sub RoundTwoDecimals()
    Range(" B2 ") = WorksheetFunction.Round(Range(" A2 "), 2)
End Sub

In dit specifieke voorbeeld wordt de waarde in cel A2 afgerond op twee decimalen en wordt de afgeronde waarde in cel B2 weergegeven.

Methode 2: Rond alle waarden in het bereik af op 2 decimalen

 Sub RoundTwoDecimals()
    Dim i As Integer

    For i = 2 To 9
        Range(" B " & i) = WorksheetFunction.Round(Range(" A " & i), 2)
    Next i
End Sub

In dit specifieke voorbeeld wordt elke waarde in het bereik A2:A9 afgerond op twee decimalen en worden de afgeronde waarden in het bereik B2:B9 weergegeven.

De volgende voorbeelden laten zien hoe u elke methode in de praktijk kunt gebruiken.

Voorbeeld 1: Rond een waarde af op 2 decimalen

We kunnen de volgende macro maken om de waarde in cel A2 af te ronden op twee decimalen en het resultaat weer te geven in cel B2 :

 Sub RoundTwoDecimals()
    Range(" B2 ") = WorksheetFunction.Round(Range(" A2 "), 2)
End Sub

Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:

Houd er rekening mee dat de waarde 15,248 in cel A2 in cel B2 is afgerond op twee decimalen (15,25).

Voorbeeld 2: Rond alle waarden in het bereik af op 2 decimalen

We kunnen de volgende macro maken om elk van de waarden in het bereik A2:A9 af te ronden op twee decimalen en de afgeronde waarden in het bereik B2:B9 weer te geven:

 Sub RoundTwoDecimals()
    Dim i As Integer

    For i = 2 To 9
        Range(" B " & i) = WorksheetFunction.Round(Range(" A " & i), 2)
    Next i
End Sub

Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:

Houd er rekening mee dat elke waarde in het bereik A2:A9 is afgerond op twee decimalen en dat de afgeronde waarden worden weergegeven in het bereik B2:B9 .

Opmerking : u kunt hier de volledige documentatie voor de VBA Round- methode vinden.

Aanvullende bronnen

In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in VBA kunt uitvoeren:

Hoe waarden in VBA af te ronden
Hoe waarden in VBA af te ronden