VBA Abs funktion

Abs Beskrivelse

Returnerer den absolutte værdi af et tal.

Enkle abs eksempler

123	Sub Abs_Example ()MsgBox Abs (-12,5)Afslut Sub

Denne kode returnerer 12.5

Abs Syntaks

I VBA Editor kan du skrive "Abs (" for at se syntaksen for Abs -funktionen:

Abs -funktionen indeholder et argument:

Nummer: En numerisk værdi.

Eksempler på Excel VBA Abs -funktion

du kan referere til en celle, der indeholder en dato:

1234567

Sub Abs_Example1 ()Dim celle som områdeFor hver celle i området ("A2: A4")cell.Offset (0, 1) = Abs (cell.Værdi)Næste celleAfslut Sub

Resultatet bliver som følger. (Se B2: B4)

De følgende 2 eksempler returnerer begge 12.

1	MsgBox Abs (-12)

1	MsgBox Abs (12)

For at finde et tal, der er tættest på 2, når et tal array (1.5, 3.1, 2.1, 2.2, 1.8) er givet, kan du bruge følgende kode.

1234567891011121314151617181920

Sub Abs_Example2 ()Dim NumbersDim elementDim nærmeste værdi som dobbeltDim diff som dobbeltDim minDiff As DoubleminDiff = 100Tal = Array (1,5, 3,1, 2,1, 2,2, 1,8)For hvert element i taldiff = Abs (element - 2)Hvis diff <minDiff SåminDiff = diffcloseValue = elementAfslut HvisNæste elementMsgBox "Den nærmeste værdi:" & closeValueAfslut Sub

Resultatet bliver 2,1 som følger.