Lang L: none (table-of-contents)
Abs Kirjeldus
Tagastab arvu absoluutväärtuse.
Lihtsad abs näited
| 123 | Alam abs_näide ()MsgBox Abs (-12,5)End Sub |
See kood tagastab 12.5
Abs süntaks
VBA redaktoris saate abs -funktsiooni süntaksi nägemiseks tippida "Abs ("):
Funktsioon Abs sisaldab argumenti:
Arv: Arvuline väärtus.
Näited Excel VBA abs -funktsioonist
saate viidata kuupäeva sisaldavale lahtrile:
| 1234567 | Alam abs_näide1 ()Hämardage rakk vahemikunaIga vahemiku lahtri kohta ("A2: A4")cell. Offset (0, 1) = Abs (cell.Value)Järgmine lahterEnd Sub |
Tulemus on järgmine. (Vt B2: B4)
Järgmised 2 näidet tagastavad mõlemad 12.
| 1 | MsgBox Abs (-12) |
| 1 | MsgBox abs (12) |
Kui soovite leida numbrile 2 lähima arvu, kui on antud numbrimassiiv (1,5, 3,1, 2,1, 2,2, 1,8), võite kasutada järgmist koodi.
| 1234567891011121314151617181920 | Alam abs_näide2 ()Hämarad numbridHämardage eseDim lähimVäärtus TopeltDim erinevus Nagu kahekordneDim minDiff As DoubleminDiff = 100Numbrid = massiiv (1,5, 3,1, 2,1, 2,2, 1,8)Iga üksuse kohta numbriteserinevus = abs (kirje - 2)Kui erinevus <minDiff SiisminDiff = erinevuslähimVäärtus = üksusLõpp KuiJärgmine üksusMsgBox "Lähim väärtus:" & lähimVäärtusEnd Sub |
Tulemuseks on järgmine 2.1.
