VBA: A Função ABS().

 

A Função ABS() fornece o valor absoluto de um determinado número, como é referenciado e bem em: Tech on the Net

 

No exemplo mostrado no link acima mencionado, os valores negativos passam a positivos, com a utilização da função referida.

A sintaxe é ABS(número). Se tivermos numa célula, por exemplo, em A1, o valor -210.67 e quisermos passar a ter o valor como positivo, podemos utilizar a função do seguinte modo: Em B1, digitamos ABS(A1). O resultado, será 210.67. Também podemos digitar directamente na célula A1 o seguinte =ABS(-210.67). O resultado será o mesmo.

E então, se quisermos fazer exactamente o contrário, ou seja, passar um valor positivo para negativo, mesmo digitando-o numa determinada célula como valor positivo, por exemplo, na célula E9?

Neste caso, teremos que utilizar um pouco de código:

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Row = 9 And Target.Column = 5 Then
   Target = -Abs(Target.Value)
End If

End Sub