Sommario
Descrizione degli addominali
Restituisce il valore assoluto di un numero.
Esempi di addominali semplici
123 | Sub Abs_Esempio()MsgBox Abs(-12,5)Fine sottotitolo |
Questo codice restituirà 12.5
Sintassi Abs
Nell'editor VBA, puoi digitare "Abs(" per vedere la sintassi per la funzione Abs:
La funzione Abs contiene un argomento:
Numero: Un valore numerico.
Esempi di funzione Abs VBA di Excel
puoi fare riferimento a una cella contenente una data:
1234567 | Sub Abs_Esempio1()Cella debole come intervalloPer ogni cella nell'intervallo ("A2: A4")cell.Offset(0, 1) = Abs(cell.Valore)Cella successivaFine sottotitolo |
Il risultato sarà il seguente. (vedi B2: B4)
I seguenti 2 esempi restituiranno entrambi 12.
1 | MsgBox Abs(-12) |
1 | MsgBox Abs(12) |
Per trovare un numero più vicino a 2 quando viene fornito un array di numeri (1.5, 3.1, 2.1, 2.2, 1.8), è possibile utilizzare il codice seguente.
1234567891011121314151617181920 | Sub Abs_Esempio2()Numeri deboliOggetto scuroDim più vicinoValore come doppioDim diff come doppioDim minDiff As DoubleminDiff = 100Numeri = Matrice (1.5, 3.1, 2.1, 2.2, 1.8)Per ogni articolo in numeridiff = Abs (elemento - 2)Se diff < minDiff AlloraminDiff = diffvalore più vicino = elementoFinisci seArticolo successivoMsgBox "Il valore più vicino: " & valore più vicinoFine sottotitolo |
Il risultato sarà 2.1 come segue.