Comment calculer des valeurs absolues dans VBA (avec exemple)

La valeur absolue d’un nombre représente la distance entre le nombre et zéro.

Pour calculer des valeurs absolues dans VBA, vous pouvez utiliser la fonction Abs .

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

Sub FindAbsoluteValue()

    Dim i As Integer
    
    For i = 2 To 10
        Range("B" & i) = Abs(Range("A" & i))
    Next i
      
End Sub

Cet exemple particulier calcule la valeur absolue de chaque cellule dans la plage A2:A10 et les affiche dans la plage B2:B10 .

L’exemple suivant montre comment calculer des valeurs absolues dans VBA dans la pratique.

Exemple : Comment calculer des valeurs absolues dans VBA

Supposons que nous ayons la liste de valeurs suivante dans Excel :

Supposons que nous souhaitions calculer la valeur absolue de chaque cellule de la colonne A et les afficher dans la colonne B.

Nous pouvons créer la macro suivante pour ce faire :

Sub FindAbsoluteValue()

    Dim i As Integer
    
    For i = 2 To 10
        Range("B" & i) = Abs(Range("A" & i))
    Next i
      
End Sub

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

La colonne B affiche désormais la valeur absolue de chaque valeur de la colonne A.

Notez que chacune des valeurs positives de la colonne A est restée positive dans la colonne B.

Notez également que chacune des valeurs négatives de la colonne A ont été converties en positives dans la colonne B.

Remarque : Vous pouvez trouver la documentation complète de la fonction VBA Abs ici .

Ressources additionnelles

Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes dans VBA :

VBA : Comment calculer la valeur moyenne de la plage
VBA : Comment additionner les valeurs dans une plage
VBA : Comment compter le nombre de lignes dans la plage