Абс описание
Връща абсолютната стойност на число.
Примери за прости абс
| 123 | Sub Abs_Example ()MsgBox Abs (-12,5)End Sub |
Този код ще върне 12.5
Синтаксис на Abs
В редактора на VBA можете да въведете „Abs (“, за да видите синтаксиса за функцията Abs:
Функцията Abs съдържа аргумент:
Номер: Числена стойност.
Примери за Excel VBA Abs функция
можете да посочите клетка, съдържаща дата:
| 1234567 | Sub Abs_Example1 ()Затъмняване на клетката като обхватЗа всяка клетка в обхвата ("A2: A4")cell.Offset (0, 1) = Abs (cell.Value)Следващата клеткаEnd Sub |
Резултатът ще бъде следният (вижте B2: B4)
Следващите 2 примера и двата ще върнат 12.
| 1 | MsgBox Abs (-12) |
| 1 | MsgBox Abs (12) |
За да намерите число, най -близко до 2, когато е даден масив от числа (1.5, 3.1, 2.1, 2.2, 1.8), можете да използвате следния код.
| 1234567891011121314151617181920 | Sub Abs_Example2 ()Затъмнени числаЗатъмнен елементЗатъмнете най -близката стойност като двойнаDim diff As DoubleDim minDiff As DoubleminDiff = 100Числа = масив (1.5, 3.1, 2.1, 2.2, 1.8)За всеки елемент в числаdiff = Abs (артикул - 2)Ако diff <minDiff ТогаваminDiff = разлблизка стойност = елементКрай АкоСледващият елементMsgBox "Най -близката стойност:" & близка стойностEnd Sub |
Резултатът ще бъде 2.1, както следва.
