Raíz cuadrada de VBA

Función de raíz cuadrada de Excel VBA (SQR)

En VBA tenemos una función incorporada llamada "SQR", esta función devuelve la raíz cuadrada del número proporcionado en la entrada. La función de raíz cuadrada requiere solo un argumento para su función, es decir, número.

SQRT es una función de raíz cuadrada tanto en Excel como en VBA, el método para usar esta función es el siguiente SQR (número) y se usa para calcular la raíz cuadrada de un número dado en Excel, sin embargo, la nomenclatura es diferente y se escribe como SQRT en comparación a SQR en VBA.

A continuación se muestra la sintaxis de la función SQR.

Número: para este argumento, necesitamos proporcionar el número para el que estamos tratando de encontrar la raíz cuadrada. El número podría ser un suministro directo de número o número asignado a la variable o un número con referencia de celda es válido.

Esta función está disponible tanto con la función de hoja de trabajo como con la función VBA, pero en una hoja de trabajo, está disponible como SQRT.

Ejemplos de raíz cuadrada en Excel VBA

Puede descargar esta plantilla de Excel de función VBA SQRT aquí - Plantilla de Excel de función VBA SQRT

Ejemplo 1

Ahora intentaremos escribir código para encontrar la raíz cuadrada del número 64.

Primero, inicie la subrutina vba.

Código:

 Sub Square_Root_Example () End Sub 

Defina dos variables como Entero, una es para almacenar el número y otra es para mostrar el resultado del valor de la raíz cuadrada.

Código:

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

Para la variable “ActualNumber” asigne el valor del número 64.

Código:

 Sub Square_Root_Example () Dim ActualNumber como entero Dim SquareNumber como entero ActualNumber = 64 End Sub 

Para otra variable, asignaremos el valor de la raíz cuadrada, ingresaremos el nombre de la variable, colocaremos igual y abriremos la función SQR.

El único argumento de la función SQR es "Número" ya que ya hemos asignado el número 64 a la variable "ActualNumber", proporcionemos el mismo nombre de variable en la función SQR.

A continuación, muestre el resultado en el cuadro de mensaje. Ahora el número de raíz cuadrada se asigna a la variable "SquareNumber" muestra el mismo nombre de variable en el cuadro de mensaje.

Código:

 Sub Square_Root_Example () Dim ActualNumber como entero Dim SquareNumber como entero ActualNumber = 64 SquareNumber = Sqr (ActualNumber) MsgBox SquareNumber End Sub 

Ok, eso es todo lo que hemos hecho con la codificación.

Ejecute el código usando la tecla de método abreviado de Excel F5 y vea lo que obtenemos en el cuadro de mensaje.

La raíz cuadrada del número 64 es 8, es decir, 8 * 8 = 64

Ejemplo # 2

Una cosa más que debemos tener en cuenta al calcular sqrt en VBA es que cuando el tipo de datos de la variable es entero o largo, el resultado se redondea al valor entero o número entero más cercano.

Por ejemplo, si está tratando de encontrar la raíz cuadrada del número 70, no hay raíz cuadrada para esto, pero en VBA se muestra como 8 solo porque 8 es el valor entero de raíz cuadrada más cercano.

Mira el siguiente código.

Código:

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

El resultado real del número de raíz cuadrada para 70 es 8.3666 pero con VBA se redondeará al valor entero más cercano 8.

Una cosa que podemos hacer para rectificar este error es que necesitamos cambiar el tipo de datos de la variable "SquareNumber" a "Double".

Código:

 Sub Square_Root_Example1 () Dim ActualNumber como número entero Dim SquareNumber como doble ActualNumber = 70 SquareNumber = Sqr (ActualNumber) MsgBox SquareNumber End Sub 

Ahora ejecute el código manualmente o mediante la tecla F5 y vea el resultado.

Como puede ver, el resultado es preciso ahora, es decir, 8.366602, esto se debe al tipo de datos que le hemos asignado a la variable "SquareNumber".

Cosas para recordar

  • En VBA para encontrar la raíz cuadrada de la fórmula numérica es SQR y en la hoja de trabajo es SQRT.
  • El número que proporcionamos a la función SQR debe ser un número positivo o de lo contrario obtendremos #NUM! error.