Hoe absolute waarden in vba te berekenen (met voorbeeld)

De absolute waarde van een getal vertegenwoordigt de afstand tussen het getal en nul.

Om absolute waarden in VBA te berekenen, kunt u de Abs- functie gebruiken.

Hier is een gebruikelijke manier om deze functie in de praktijk te gebruiken:

 Sub FindAbsoluteValue()

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

Dit specifieke voorbeeld berekent de absolute waarde van elke cel in het bereik A2:A10 en geeft deze weer in het bereik B2:B10 .

Het volgende voorbeeld laat zien hoe u in de praktijk absolute waarden in VBA kunt berekenen.

Voorbeeld: absolute waarden berekenen in VBA

Stel dat we de volgende lijst met waarden in Excel hebben:

Stel dat we de absolute waarde van elke cel in kolom A willen berekenen en deze in kolom B willen weergeven.

We kunnen hiervoor de volgende macro maken:

 Sub FindAbsoluteValue()

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

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

Kolom B toont nu de absolute waarde van elke waarde in kolom A.

Merk op dat elk van de positieve waarden in kolom A positief bleef in kolom B.

Merk ook op dat elk van de negatieve waarden in kolom A is omgezet naar positieve waarden in kolom B.

Opmerking : u kunt hier de volledige documentatie voor de VBA Abs- functie vinden.

Aanvullende bronnen

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

VBA: Hoe de gemiddelde waarde van het bereik te berekenen
VBA: waarden toevoegen in een bereik
VBA: het aantal rijen binnen bereik tellen