VBA Abs -funktion

Abs Beskrivning

Returnerar det absoluta värdet för ett tal.

Enkla Abs Exempel

123	Sub Abs_Exempel ()MsgBox Abs (-12,5)Avsluta Sub

Denna kod returnerar 12.5

Abs Syntax

I VBA Editor kan du skriva "Abs (" för att se syntaxen för Abs -funktionen:

Abs -funktionen innehåller ett argument:

Siffra: Ett numeriskt värde.

Exempel på Excel VBA Abs -funktion

du kan referera till en cell som innehåller ett datum:

1234567

Sub Abs_Exempel1 ()Dim cell As RangeFör varje cell i intervallet ("A2: A4")cell.Offset (0, 1) = Abs (cell.Värde)Nästa cellAvsluta Sub

Resultatet blir följande. (Se B2: B4)

Följande 2 exempel kommer båda att returnera 12.

1	MsgBox Abs (-12)

1	MsgBox Abs (12)

För att hitta ett tal närmast 2 när en talmatris (1.5, 3.1, 2.1, 2.2, 1.8) ges kan du använda följande kod.

1234567891011121314151617181920

Sub Abs_Exempel2 ()Dim NumbersDim objektDim närmaste värde som dubbelDim diff As DoubleDim minDiff As DoubleminDiff = 100Siffror = Array (1.5, 3.1, 2.1, 2.2, 1.8)För varje objekt i nummerdiff = Abs (artikel - 2)Om diff <minDiff DåminDiff = diffnärmaste värde = objektAvsluta omNästa objektMsgBox "Det närmaste värdet:" & närmaste värdeAvsluta Sub

Resultatet blir 2,1 enligt följande.