VBA : Comment arrondir les valeurs à 2 décimales
Vous pouvez utiliser les méthodes suivantes pour arrondir les valeurs à 2 décimales à l’aide de VBA :
Méthode 1 : Arrondir une valeur à 2 décimales
Sub RoundTwoDecimals()
Range("B2") = WorksheetFunction.Round(Range("A2"), 2)
End Sub
Cet exemple particulier arrondira la valeur de la cellule A2 à deux décimales et affichera la valeur arrondie dans la cellule B2 .
Méthode 2 : arrondir toutes les valeurs de la plage à 2 décimales
Sub RoundTwoDecimals()
Dim i As Integer
For i = 2 To 9
Range("B" & i) = WorksheetFunction.Round(Range("A" & i), 2)
Next i
End Sub
Cet exemple particulier arrondira chaque valeur de la plage A2:A9 à deux décimales et affichera les valeurs arrondies dans la plage B2:B9 .
Les exemples suivants montrent comment utiliser chaque méthode dans la pratique.
Exemple 1 : Arrondir une valeur à 2 décimales
Nous pouvons créer la macro suivante pour arrondir la valeur de la cellule A2 à deux décimales et afficher le résultat dans la cellule B2 :
Sub RoundTwoDecimals()
Range("B2") = WorksheetFunction.Round(Range("A2"), 2)
End Sub
Lorsque nous exécutons cette macro, nous recevons le résultat suivant :
Notez que la valeur 15,248 dans la cellule A2 a été arrondie à deux décimales (15,25) dans la cellule B2 .
Exemple 2 : Arrondir toutes les valeurs de la plage à 2 décimales
Nous pouvons créer la macro suivante pour arrondir chacune des valeurs de la plage A2:A9 à deux décimales et afficher les valeurs arrondies dans la plage B2:B9 :
Sub RoundTwoDecimals()
Dim i As Integer
For i = 2 To 9
Range("B" & i) = WorksheetFunction.Round(Range("A" & i), 2)
Next i
End Sub
Lorsque nous exécutons cette macro, nous recevons le résultat suivant :
Notez que chaque valeur de la plage A2:A9 a été arrondie à deux décimales et que les valeurs arrondies sont affichées dans la plage B2:B9 .
Remarque : Vous pouvez trouver la documentation complète de la méthode VBA Round ici .
Ressources additionnelles
Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes dans VBA :
Comment arrondir les valeurs dans VBA
Comment arrondir les valeurs dans VBA