Descrição Abs
Retorna o valor absoluto de um número.
Exemplos Simples de Abs
| 123 | Sub Abs_Example ()MsgBox Abs (-12,5)End Sub |
Este código retornará 12,5
Sintaxe Abs
No Editor VBA, você pode digitar “Abs (” para ver a sintaxe da Função Abs:
A função Abs contém um argumento:
Número: Um valor numérico.
Exemplos de função de abs do Excel VBA
você pode fazer referência a uma célula que contém uma data:
| 1234567 | Sub Abs_Example1 ()Dim cell como rangePara cada célula no intervalo ("A2: A4")cell.Offset (0, 1) = Abs (cell.Value)Próxima célulaEnd Sub |
O resultado será o seguinte. (Consulte B2: B4)
Os 2 exemplos a seguir retornarão 12.
| 1 | MsgBox Abs (-12) |
| 1 | MsgBox Abs (12) |
Para encontrar um número mais próximo de 2 quando uma matriz de número (1,5, 3,1, 2,1, 2,2, 1,8) é fornecida, você pode usar o código a seguir.
| 1234567891011121314151617181920 | Sub Abs_Example2 ()Números obscurosDim itemDim closeValue As DoubleDim diff As DoubleDim minDiff As DoubleminDiff = 100Números = Matriz (1.5, 3.1, 2.1, 2.2, 1.8)Para cada item em númerosdiff = Abs (item - 2)If diff <minDiff ThenminDiff = diffnearValue = itemFim sePróximo itemMsgBox "O valor mais próximo:" & nearValueEnd Sub |
O resultado será 2.1 conforme a seguir.
