Radice quadrata VBA

Funzione Excel VBA Square Root (SQR)

In VBA abbiamo una funzione incorporata chiamata "SQR", questa funzione restituisce la radice quadrata per il numero dato fornito nell'input. La funzione radice quadrata richiede un solo argomento per la sua funzione, ad esempio Numero.

SQRT è una funzione radice quadrata sia in Excel che in VBA, il metodo per utilizzare questa funzione è il seguente SQR (numero) e utilizzato per calcolare la radice quadrata di un dato numero in Excel, tuttavia la nomenclatura è diversa ed è scritta come SQRT rispetto a SQR in VBA.

Di seguito è riportata la sintassi della funzione SQR.

Numero: per questo argomento, dobbiamo fornire il numero per il quale stiamo cercando di trovare la radice quadrata. Il numero potrebbe essere una fornitura diretta di numero o numero assegnato alla variabile oppure un numero con riferimento di cella è valido.

Questa funzione è disponibile sia con la funzione foglio di lavoro che con la funzione VBA, ma in un foglio di lavoro è disponibile come SQRT.

Esempi di radice quadrata in Excel VBA

È possibile scaricare questo modello Excel per la funzione SQRT VBA qui - Modello Excel per la funzione SQRT VBA

Esempio 1

Ora proveremo a scrivere il codice per trovare la radice quadrata per il numero 64.

Per prima cosa, avvia la subroutine vba.

Codice:

 Sub Square_Root_Example () End Sub 

Definire due variabili come Integer, una per memorizzare il numero e un'altra per mostrare il risultato del valore della radice quadrata.

Codice:

 Sub Square_Root_Example () Dim ActualNumber As Integer Dim SquareNumber As Integer End Sub 

Per la variabile “ActualNumber” assegnare il valore del numero 64.

Codice:

 Sub Square_Root_Example () Dim ActualNumber As Integer Dim SquareNumber As Integer ActualNumber = 64 End Sub 

Per un'altra variabile, assegneremo il valore della radice quadrata, inserire il nome della variabile, mettere uguale sing e aprire la funzione SQR.

L'unico argomento della funzione SQR è "Number" poiché abbiamo già assegnato il numero 64 alla variabile "ActualNumber", forniamo lo stesso nome di variabile nella funzione SQR.

Quindi mostra il risultato nella finestra del messaggio. Ora il numero di radice quadrata viene assegnato alla variabile "SquareNumber" mostra lo stesso nome di variabile nella finestra di messaggio.

Codice:

 Sub Square_Root_Example () Dim ActualNumber As Integer Dim SquareNumber As Integer ActualNumber = 64 SquareNumber = Sqr (ActualNumber) MsgBox SquareNumber End Sub 

Ok, è tutto ciò che abbiamo fatto con la codifica.

Esegui il codice usando il tasto di scelta rapida Excel F5 e guarda cosa otteniamo nella finestra del messaggio.

La radice quadrata del numero 64 è 8, ovvero 8 * 8 = 64

Esempio n. 2

Un'altra cosa che dobbiamo tenere a mente durante il calcolo di sqrt in VBA è quando il tipo di dati della variabile è intero o lungo, il risultato viene arrotondato al valore intero o numero intero più vicino.

Ad esempio, se stai cercando di trovare la radice quadrata per il numero 70, non esiste una radice quadrata per questo, ma in VBA viene visualizzato come 8 solo perché 8 è il valore intero della radice quadrata più vicino.

Guarda il codice sottostante.

Codice:

 Sub Square_Root_Example1 () Dim ActualNumber As Integer Dim SquareNumber As Integer ActualNumber = 70 SquareNumber = Sqr (ActualNumber) MsgBox SquareNumber End Sub 

Il risultato effettivo del numero di radice quadrata per 70 è 8.3666 ma con VBA verrà arrotondato al valore intero più vicino 8.

Una cosa che possiamo fare per correggere questo errore è che dobbiamo cambiare il tipo di dati della variabile "SquareNumber" in "Double".

Codice:

 Sub Square_Root_Example1 () Dim ActualNumber As Integer Dim SquareNumber As Double ActualNumber = 70 SquareNumber = Sqr (ActualNumber) MsgBox SquareNumber End Sub 

Ora esegui il codice manualmente o tramite il tasto F5 e guarda il risultato.

Come puoi vedere il risultato ora è accurato, ovvero 8.366602 questo è dovuto al tipo di dati che abbiamo assegnato alla variabile "SquareNumber"

Cose da ricordare

  • In VBA per trovare la radice quadrata della formula numerica è SQR e nel foglio di lavoro è SQRT.
  • Il numero che forniamo alla funzione SQR dovrebbe essere un numero positivo altrimenti otterremo #NUM! errore.