Comment utiliser la fonction Floor dans VBA (avec exemples)

Vous pouvez utiliser la méthode Floor dans VBA pour arrondir le nombre dans une cellule au multiple significatif le plus proche.

Voici une manière courante d’utiliser cette fonction dans la pratique :

Sub ToFloor()

Dim i As Integer

For i = 2 To 10
    Range("C" & i) = WorksheetFunction.Floor(Range("A" & i), Range("B" & i))
Next i

End Sub

Cette macro particulière arrondira chaque valeur de la plage A2:A10 au multiple significatif le plus proche spécifié dans la plage B2:B10 et affichera les résultats dans la plage C2:C10 .

L’exemple suivant montre comment utiliser cette syntaxe dans la pratique.

Exemple : Comment utiliser la fonction Floor dans VBA

Supposons que nous ayons une liste de valeurs dans la colonne A et une autre liste de multiples significatifs dans la colonne B auxquelles nous aimerions arrondir chaque valeur à :

Nous pouvons créer la macro suivante avec la méthode Floor dans VBA pour arrondir chaque valeur de la colonne A au multiple significatif dans la colonne B :

Sub ToFloor()

Dim i As Integer

For i = 2 To 10
    Range("C" & i) = WorksheetFunction.Floor(Range("A" & i), Range("B" & i))
Next i

End Sub

Lorsque nous exécutons cette macro, nous recevons le résultat suivant :

La colonne C montre le résultat de l’utilisation de la méthode Floor sur chaque valeur de la colonne A.

Par exemple, on peut voir :

• 12,2452 arrondi au multiple inférieur de 0,001 est 12,245 .
• 14,927 arrondi au multiple inférieur de 0,01 est 14,92 .
• -5,23 arrondi au multiple inférieur de 0,1 est -5,3 .

Et ainsi de suite.

Remarque : Vous pouvez trouver la documentation complète de la méthode VBA Floor 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
Comment arrondir les valeurs à 2 décimales dans VBA