Permalink
Cannot retrieve contributors at this time
title | keywords | f1_keywords | ms.prod | ms.assetid | ms.date | ms.localizationpriority |
---|---|---|---|---|---|---|
Sqr function (Visual Basic for Applications) |
vblr6.chm1009029 |
vblr6.chm1009029 |
office |
ce2add56-f943-9470-0caa-befda14d124a |
12/13/2018 |
medium |
Returns a Double specifying the square root of a number.
Syntax
Sqr(number)
The required number argument is a Double or any valid numeric expression greater than or equal to zero.
Example
This example uses the Sqr function to calculate the square root of a number.
Dim MySqr MySqr = Sqr(4) ' Returns 2. MySqr = Sqr(23) ' Returns 4.79583152331272. MySqr = Sqr(0) ' Returns 0. MySqr = Sqr(-4) ' Generates a run-time error.
See also
- Functions (Visual Basic for Applications)
[!includeSupport and feedback]
Excel VBA Square Root (SQR) Function
In VBA, we have a built-in function called “SQR.” This function returns the square root for the given number provided in the input. The Square Root function requires only one argument for its function: Number.
The SQRT is a square root functionThe Square Root function is an arithmetic function built into Excel that is used to determine the square root of a given number. To use this function, type the term =SQRT and hit the tab key, which will bring up the SQRT function. Moreover, this function accepts a single argument.read more in both Excel and VBA. The method to use this function is SQR(Number). One may use it to calculate the square root of a given number in Excel. However, the nomenclature is different. For example, one may write as SQRT compared to SQR in VBA.
Table of contents
- Excel VBA Square Root (SQR) Function
- Examples of Square Root in Excel VBA
- Example #1
- Example #2
- Things to Remember
- Recommended Articles
- Examples of Square Root in Excel VBA
Below is the syntax of the SQR function.
Number: For this argument, we need to supply the Number for which we are trying to find the square root. The Number could be a direct supply of a Number or Number assigned to the variable, or a Number with cell referenceCell reference in excel is referring the other cells to a cell to use its values or properties. For instance, if we have data in cell A2 and want to use that in cell A1, use =A2 in cell A1, and this will copy the A2 value in A1.read more is valid.
This function is available with both worksheet and VBA functionVBA functions serve the primary purpose to carry out specific calculations and to return a value. Therefore, in VBA, we use syntax to specify the parameters and data type while defining the function. Such functions are called user-defined functions.read more. But in a worksheet, it is available as SQRT.
You are free to use this image on your website, templates, etc, Please provide us with an attribution linkArticle Link to be Hyperlinked
For eg:
Source: VBA Square Root (wallstreetmojo.com)
Examples of Square Root in Excel VBA
You can download this VBA SQRT Function Excel Template here – VBA SQRT Function Excel Template
Example #1
Now, we will try to write code to find the square root for the number 64.
But, first, start the VBA subroutineSUB in VBA is a procedure which contains all the code which automatically gives the statement of end sub and the middle portion is used for coding. Sub statement can be both public and private and the name of the subprocedure is mandatory in VBA.read more.
Code:
Sub Square_Root_Example() End Sub
Define two variables as Integer. One is to store the Number, and another is to show the result of the square root value.
Code:
Sub Square_Root_Example() Dim ActualNumber As Integer Dim SquareNumber As Integer End Sub
For the variable “ActualNumber,” assign the value of the number 64.
Code:
Sub Square_Root_Example() Dim ActualNumber As Integer Dim SquareNumber As Integer ActualNumber = 64 End Sub
We will assign the square root value for another variable, enter the variable name, put an equal sign, and open the SQR function.
The only argument of the SQR function is “Number” since we have already assigned the number 64 to the variable “ActualNumber.” So, let us supply the same variable name in the SQR function.
Next, show the result in the message box. For example, the square root number assigned to the variable “SquareNumber” shows the same variable name in the message box.
Code:
Sub Square_Root_Example() Dim ActualNumber As Integer Dim SquareNumber As Integer ActualNumber = 64 SquareNumber = Sqr(ActualNumber) MsgBox SquareNumber End Sub
We have completed coding.
Run the code using excel shortcut keyAn Excel shortcut is a technique of performing a manual task in a quicker way.read more F5 and see what we get in the message box.
The Square Root of the number 64 is 8, 8 * 8 = 64.
Example #2
One more thing we need to remember while calculating sqrt in VBA is when the variable data type is either integer or long. Then, the result rounds off to the nearest integer or whole number value.
For example, if you are trying to find the square root for the number 70, there is no square root for this. But in VBA, it shows as 8 only because 8 is the nearest square root integer value.
Look at the below code.
Code:
Sub Square_Root_Example1() Dim ActualNumber As Integer Dim SquareNumber As Integer ActualNumber = 70 SquareNumber = Sqr(ActualNumber) MsgBox SquareNumber End Sub
The actual square root number result for 70 is 8.3666. But with VBA, it will round to the nearest integer value 8.
One thing we can do to rectify this error is we need to change the data type of the variable “SquareNumber” to “Double.”
Code:
Sub Square_Root_Example1() Dim ActualNumber As Integer Dim SquareNumber As Double ActualNumber = 70 SquareNumber = Sqr(ActualNumber) MsgBox SquareNumber End Sub
Run the code manually or through the F5 key to see the result.
As you can see, the result is accurate now, i.e., 8.366602. This is because of the data type assigned to the variable “SquareNumber.”
Things to Remember
- In VBA, to find the square root of the number formula is SQR, and in the worksheet, it is SQRT.
- The Number we supply to the SQR function should be a positive number, or else we will get #NUM! Error.
Recommended Articles
This article has been a guide to VBA Square Root Function. Here, we discuss calculating square roots using the SQRT function in Excel VBA with practical examples and a downloadable Excel template. Below you can find some useful Excel VBA articles: –
- Project Password in VBA
- VBA Compare String
- On Error Resume Next in VBA
- VBA LBound
What is the square root function in VBA excel? I tried SQRT() and Root() but none of them are working, my Excel version in 2013.
asked Apr 28, 2017 at 11:53
2
Use the oddly named
VBA.Sqr(n)
where n
is your number for which you want the square root computed. The VBA.
prefix is optional, but it helps descriminate between VBA
and any other library you might have referenced.
answered Apr 28, 2017 at 11:55
BathshebaBathsheba
231k33 gold badges359 silver badges477 bronze badges
1
Nth root can be obtained with VBA with:
Option Explicit
Function NthRoot(dblNumber As Double, lngRoot As Long) As Double
NthRoot = dblNumber ^ (1 / lngRoot)
End Function
So for square root:
? NthRoot(64, 2)
8
? NthRoot(64.33333, 2)
8.02080606921773
answered Apr 28, 2017 at 13:15
Robin MackenzieRobin Mackenzie
18.1k7 gold badges41 silver badges54 bronze badges
You can use the ^ operator to obtain square roots. Just raise the number you started with to the power of 0.5:
81^0.5
will give you 9 and 256^0.5
will give you 16
answered Apr 28, 2017 at 23:23
barrowcbarrowc
10.4k1 gold badge39 silver badges52 bronze badges
Sqr : is the function used to calcualte the sqare root, or you can use ^0.5
Function getDistance(x1, y1, x2, y2)
getDistance = Sqr((x2 - x1) ^ 2 + (y2 - y1) ^ 2)
End Function
answered Sep 10, 2022 at 2:26
Arpan SainiArpan Saini
4,3641 gold badge38 silver badges50 bronze badges
This Excel tutorial explains how to use the Excel SQR function with syntax and examples.
Description
The Microsoft Excel SQR function returns the square root of a number.
The SQR function is a built-in function in Excel that is categorized as a Math/Trig Function. It can be used as a VBA function (VBA) in Excel. As a VBA function, you can use this function in macro code that is entered through the Microsoft Visual Basic Editor.
Syntax
The syntax for the SQR function in Microsoft Excel is:
Sqr( number )
Parameters or Arguments
- number
- A positive number that you wish to return the square root for.
Returns
The SQR function returns a numeric value.
If a negative number is entered in the number parameter, the SQR function will raise an error.
Applies To
- Excel for Office 365, Excel 2019, Excel 2016, Excel 2013, Excel 2011 for Mac, Excel 2010, Excel 2007, Excel 2003, Excel XP, Excel 2000
Type of Function
- VBA function (VBA)
Example (as VBA Function)
The SQR function can only be used in VBA code in Microsoft Excel. If you need to calculate the square root within a worksheet formula, try the SQRT function.
Let’s look at some Excel SQR function examples and explore how to use the SQR function in Excel VBA code:
=Sqr(25) Result: 5 =Sqr(30) Result: 5.47722557505166 =Sqr(2.5) Result: 1.58113883008419
For example:
Dim LResult As Double LResult = Sqr(900) Msgbox LResult
In this example, the variable called LResult would now contain the value 30.
Содержание
- VBA квадратный корень — Как использовать функцию квадратного корня в Excel VBA?
- Функция Excel VBA Square Root
- Как использовать функцию квадратного корня в Excel VBA?
- Квадратный корень VBA — Пример № 1
- Квадратный корень VBA — Пример №2
- То, что нужно запомнить
- Рекомендуемые статьи
- Математические функции (Visual Basic)
- Remarks
- Пример — Abs
- Пример — Atan
- VBA Square Root
- Excel VBA Square Root (SQR) Function
- Examples of Square Root in Excel VBA
- Example #1
- Example #2
- Things to Remember
- Recommended Articles
VBA квадратный корень — Как использовать функцию квадратного корня в Excel VBA?
Функция Excel VBA Square Root
В этой статье мы увидим схему Excel VBA Square Root. Каждый раз, работая в Excel, вы должны использовать функцию SQRT, которая дает квадратный корень любого целого числа в результате. Можно ли захватить квадратный корень из числа под VBA? Ну, ответ, конечно, да! Вы можете получить квадратный корень любого положительного числа через VBA, используя функцию VBA SQR. Эта функция является встроенной функцией VBA и может использоваться для любого положительного целого числа, чтобы получить ее квадратный корень. Ну, эта функция очень похожа на ту, которую мы используем в качестве функции электронной таблицы SQRT, а также принимаем тот же единственный аргумент «Число», который должен быть положительным. Мы также не можем получить квадратные корни мнимых чисел, и ввод отрицательных значений бесполезен, потому что нет никакого способа, которым можно получить отрицательное квадратное значение числа.
Синтаксис:
Синтаксис функции квадратного корня VBA довольно прост и похож на синтаксис функции SQRT электронной таблицы.
Где Number — это единственный аргумент, который необходимо указать и который должен быть строго положительным. Поскольку мы не можем иметь отрицательные квадратные значения любого числа, шансы получить отрицательное значение квадратного корня невозможны. Кроме того, нет возможности узнать квадратные корни комплексных чисел. Этот аргумент может быть предоставлен непосредственно в виде числа или переменной, назначенной номеру, или ссылки на ячейку электронной таблицы, где хранится число. Кроме того, следует отметить, что система по умолчанию считает аргумент, который вы задаете, двойным, чтобы получить квадратный корень для любого числа, независимо от того, является он целым квадратом или нет (пример 87 не является целый квадрат, но все равно получит значение квадратного корня, так как тип числа двойной. Вы все еще можете определить число как целое число, а затем использовать его в качестве аргумента функции SQR. Оно округляется до ближайшего значения квадратного корня, если число при условии, не полная площадь.
Как использовать функцию квадратного корня в Excel VBA?
Ниже приведены различные примеры использования функции квадратного корня в Excel VBA.
Вы можете скачать этот шаблон Excel с квадратным корнем VBA здесь — Шаблон Excel с квадратным корнем VBA
Квадратный корень VBA — Пример № 1
Выполните следующие действия, чтобы увидеть, как именно работает функция VBA SQR.
Шаг 1. Откройте вкладку « Разработчик » и щелкните значок Visual Basic (ALT + F11).
Шаг 2: Откройте модуль на вкладке меню «Вставка», как показано ниже.
Шаг 3: Определите новую подпроцедуру, которая может содержать макрос под вновь вставленным модулем.
Код:
Шаг 4: Используйте оператор присваивания, чтобы присвоить значение функции квадратного корня VBA переменной с именем « sqr_root », чтобы мы могли напечатать результат и посмотреть, работает ли он нормально.
Код:
Шаг 5: Используйте функцию MsgBox, чтобы мы могли напечатать результат в виде окна сообщения, которое появится, как только мы запустим код.
Код:
Шаг 6: Запустите этот код, нажав F5 или кнопку Run, расположенную на самой верхней панели.
Как только вы запустите этот код, вы должны увидеть вывод, как показано ниже.
Квадратный корень VBA — Пример №2
Давайте углубимся в функцию SQR VBA и попытаемся выяснить несколько разных случаев.
Шаг 1: Определите подпроцедуру, которая может содержать ваши макросы.
Код:
Шаг 2: Нам нужно определить две новые переменные как целое число. Один для хранения значения, для которого мы хотим получить квадратный корень. Другая переменная будет для хранения результата квадратного корня после того, как мы применим функцию SQR.
Код:
Шаг 3: Присвойте значение как 87 переменной square_num, используя оператор присваивания (‘=’). Это число, для которого мы хотели получить значение квадратного корня.
Код:
Шаг 4: Используйте функцию SQR и оператор присваивания, чтобы присвоить значение квадратного корня переменной square_root . Используйте square_num в качестве аргумента в функции SQR (число, для которого мы хотели получить значение квадратного корня).
Код:
Шаг 5: Используйте свойство MsgBox, чтобы показать значение квадратного корня в виде сообщения, которое появляется, как только вы запускаете код.
Код:
Шаг 6: Запустите этот код, нажав кнопку F5 или Run, расположенную на самой верхней ленте VBE.
Шаг 7: Смотрите вывод в окне сообщения, как показано ниже:
Однако это не фактическое значение квадратного корня для числа 87. Это значение квадратного корня для числа 81. Почему в мире VBA дает неправильный вывод для функции SQR?
Ну, с VBA все в порядке. Если что-то не так, это идеально подходит для нашего кода.
Поскольку мы определили переменные как целые числа, мы ограничиваем VBA, чтобы давать квадратные корни только тех чисел, которые являются целыми квадратными числами (например, 4, 9, 16, 25 и т. Д.). Если какое-либо число не является целым квадратом, функция SQR VBA вместо выдачи ошибки выдает значение квадратного корня для числа, близкого к текущему числу. Здесь 87 имеет 81 как ближайшее целое квадратное число. Таким образом, вы получаете вывод как 9.
Шаг 8: Давайте посмотрим, что происходит, когда мы настраиваем код, определяя переменную square_root как Double вместо Integer.
Код:
Шаг 9: Вы увидите, что система теперь может зафиксировать фактическое значение квадратного корня для числа 87.
То, что нужно запомнить
- Если вы предоставите отрицательное число в качестве аргумента в функции SQR VBA, он выдаст ошибку времени выполнения «5» . Так как невозможно иметь число с отрицательными квадратными значениями.
- Если у вас есть отрицательное число, убедитесь, что вы преобразуете его в положительную сущность с помощью функции ABS. Вы также можете проверить, является ли число положительным или нет, с помощью функции SGN в VBA.
- Если вы установите ноль в качестве аргумента в функции VBA SQR, вы получите значение квадратного корня как ноль.
Рекомендуемые статьи
Это руководство по VBA Square Root. Здесь мы обсудим, как использовать функцию квадратного корня в Excel VBA вместе с практическими примерами и загружаемым шаблоном Excel. Вы также можете просмотреть наши другие предлагаемые статьи —
- VBA IF Заявления | Шаблоны Excel
- Как использовать функцию сортировки Excel VBA?
- VBA While Loop (Примеры с шаблоном Excel)
- Что такое счетчик VBA (примеры)?
Источник
Математические функции (Visual Basic)
Методы System.Math класса предоставляют тригонометрические, логарифмические и другие распространенные математические функции.
В следующей System.Math таблице перечислены методы класса. Их можно использовать в программе Visual Basic:
Метод .NET | Описание |
---|---|
Abs | Возвращает абсолютное значение числа. |
Acos | Возвращает угол, косинус которого равен указанному числу. |
Asin | Возвращает угол, синус которого равен указанному числу. |
Atan | Возвращает угол, тангенс которого равен указанному числу. |
Atan2 | Возвращает угол, тангенс которого равен отношению двух указанных чисел. |
BigMul | Возвращает полный продукт двух 32-разрядных чисел. |
Ceiling | Возвращает наименьшее целочисленное значение, большее или равное указанному или Double равному значению Decimal . |
Cos | Возвращает косинус указанного угла. |
Cosh | Возвращает гиперболический косинус указанного угла. |
DivRem | Возвращает 32-разрядные или 64-разрядные целые числа со знаком, а также возвращает оставшуюся часть в выходном параметре. |
Exp | Возвращает e (основание естественных логарифмов), поднятых до указанной мощности. |
Floor | Возвращает наибольшее целое число, которое меньше или равно указанному Decimal или Double числу. |
IEEERemainder | Возвращает оставшуюся часть, полученную из деления указанного числа на другое указанное число. |
Log | Возвращает естественный (базовый e) логарифм указанного числа или логарифм указанного числа в указанной базе. |
Log10 | Возвращает логарифм с основанием 10 указанного числа. |
Max | Возвращает большее из двух чисел. |
Min | Возвращает меньшее из двух чисел. |
Pow | Возвращает указанное число, возведенное в указанную степень. |
Round | Decimal Возвращает или Double округляет значение, округленное до ближайшего целого значения или до указанного числа дробных цифр. |
Sign | Возвращает значение, Integer указывающее знак числа. |
Sin | Возвращает синус указанного угла. |
Sinh | Возвращает гиперболический синус указанного угла. |
Sqrt | Возвращает квадратный корень из указанного числа. |
Tan | Возвращает тангенс указанного угла. |
Tanh | Возвращает гиперболический тангенс указанного угла. |
Truncate | Вычисляет неотъемлемую часть указанного Decimal или Double числа. |
В следующей таблице перечислены методы System.Math класса, которые не существуют в платформа .NET Framework, но добавляются в .NET Standard или .NET Core:
Метод .NET | Описание | Доступно в |
---|---|---|
Acosh | Возвращает угол, гиперболический косинус которого равен указанному числу. | Начиная с .NET Core 2.1 и .NET Standard 2.1 |
Asinh | Возвращает угол, гиперболический синус которого равен указанному числу. | Начиная с .NET Core 2.1 и .NET Standard 2.1 |
Atanh | Возвращает угол, гиперболический тангенс которого равен указанному числу. | Начиная с .NET Core 2.1 и .NET Standard 2.1 |
BitDecrement | Возвращает ближайшее самое маленькое значение, которое меньше, чем x . | Начиная с .NET Core 3.0 |
BitIncrement | Возвращает ближайшее самое большое значение, превышающее x . | Начиная с .NET Core 3.0 |
Cbrt | Возвращает кубический корень из указанного числа. | Начиная с .NET Core 2.1 и .NET Standard 2.1 |
Clamp | Возвращает value , ограниченное диапазоном от min до max включительно. | Начиная с .NET Core 2.0 и .NET Standard 2.1 |
CopySign | Возвращает значение с величиной x и знаком y . | Начиная с .NET Core 3.0 |
FusedMultiplyAdd | Возвращает значение (x * y) + z, округленное в рамках одной тернарной операции. | Начиная с .NET Core 3.0 |
ILogB | Возвращает целочисленный логарифм с основанием 2 указанного числа. | Начиная с .NET Core 3.0 |
Log2 | Возвращает логарифм с основанием 2 указанного числа. | Начиная с .NET Core 3.0 |
MaxMagnitude | Возвращает большую величину из двух чисел двойной точности с плавающей запятой. | Начиная с .NET Core 3.0 |
MinMagnitude | Возвращает меньшую величину из двух чисел двойной точности с плавающей запятой. | Начиная с .NET Core 3.0 |
ScaleB | Возвращает значение x * 2^n, вычисленное эффективно. | Начиная с .NET Core 3.0 |
Чтобы использовать эти функции без квалификации, импортируйте System.Math пространство имен в проект, добавив следующий код в начало исходного файла:
Пример — Abs
В этом примере метод класса используется AbsMath для вычисления абсолютного значения числа.
Пример — Atan
В этом примере метод класса используется AtanMath для вычисления значения pi.
Источник
VBA Square Root
Excel VBA Square Root (SQR) Function
In VBA, we have a built-in function called “SQR.” This function returns the square root for the given number provided in the input. The Square Root function requires only one argument for its function: Number.
Table of contents
Below is the syntax of the SQR function.
Number: For this argument, we need to supply the Number for which we are trying to find the square root. The Number could be a direct supply of a Number or Number assigned to the variable, or a Number with cell reference Cell Reference Cell reference in excel is referring the other cells to a cell to use its values or properties. For instance, if we have data in cell A2 and want to use that in cell A1, use =A2 in cell A1, and this will copy the A2 value in A1. read more is valid.
You are free to use this image on your website, templates, etc., Please provide us with an attribution link How to Provide Attribution? Article Link to be Hyperlinked
For eg:
Source: VBA Square Root (wallstreetmojo.com)
Examples of Square Root in Excel VBA
Example #1
Now, we will try to write code to find the square root for the number 64.
Code:
Define two variables as Integer. One is to store the Number, and another is to show the result of the square root value.
Code:
For the variable “ActualNumber,” assign the value of the number 64.
Code:
We will assign the square root value for another variable, enter the variable name, put an equal sign, and open the SQR function.
The only argument of the SQR function is “Number” since we have already assigned the number 64 to the variable “ActualNumber.” So, let us supply the same variable name in the SQR function.
Next, show the result in the message box. For example, the square root number assigned to the variable “SquareNumber” shows the same variable name in the message box.
Code:
We have completed coding.
The Square Root of the number 64 is 8, 8 * 8 = 64.
Example #2
One more thing we need to remember while calculating sqrt in VBA is when the variable data type is either integer or long. Then, the result rounds off to the nearest integer or whole number value.
For example, if you are trying to find the square root for the number 70, there is no square root for this. But in VBA, it shows as 8 only because 8 is the nearest square root integer value.
Look at the below code.
Code:
The actual square root number result for 70 is 8.3666. But with VBA, it will round to the nearest integer value 8.
One thing we can do to rectify this error is we need to change the data type of the variable “SquareNumber” to “Double.”
Code:
Run the code manually or through the F5 key to see the result.
As you can see, the result is accurate now, i.e., 8.366602. This is because of the data type assigned to the variable “SquareNumber.”
Things to Remember
- In VBA, to find the square root of the number formula is SQR, and in the worksheet, it is SQRT.
- The Number we supply to the SQR function should be a positive number, or else we will get #NUM! Error.
Recommended Articles
This article has been a guide to VBA Square Root Function. Here, we discuss calculating square roots using the SQRT function in Excel VBA with practical examples and a downloadable Excel template. Below you can find some useful Excel VBA articles: –
Источник
В этом учебном материале вы узнаете, как использовать Excel функцию SQR с синтаксисом и примерами.
Описание
Microsoft Excel функция SQR возвращает квадратный корень из числа.
Функция SQR — это встроенная в Excel функция, которая относится к категории математических / тригонометрических функций. Её можно использовать как функцию VBA в Excel.
В качестве функции VBA вы можете использовать эту функцию в коде макроса, который вводится через редактор Microsoft Visual Basic Editor.
Синтаксис
Синтаксис функции SQR в Microsoft Excel:
Sqr( number )
Аргументы или параметры
- number
- Положительное число, из которого вы хотите извлечь квадратный корень.
Возвращаемое значение
Функция SQR возвращает числовое значение. Если в числовой параметр введено отрицательное число, функция SQR вызовет ошибку.
Применение
- Excel для Office 365, Excel 2019, Excel 2016, Excel 2013, Excel 2011 для Mac, Excel 2010, Excel 2007, Excel 2003, Excel XP, Excel 2000
Тип функции
- Функция VBA
Пример (как функция VBA)
Функцию SQR можно использовать только в коде VBA в Microsoft Excel. Если вам нужно вычислить квадратный корень в формуле рабочего листа, попробуйте функцию КОРЕНЬ.
Давайте взглянем на некоторые примеры функции SQR, чтобы понять, как использовать Excel функцию SQR в коде Excel VBA:
=Sqr(25) Результат: 5 =Sqr(30) Результат: 5.47722557505166 =Sqr(2.5) Результат: 1.58113883008419 |
Например:
Dim LResult As Double LResult = Sqr(900) Msgbox LResult |
В этом примере переменная с именем LResult теперь будет содержать значение 30.
- Функция Excel VBA Square Root
Функция Excel VBA Square Root
В этой статье мы увидим схему Excel VBA Square Root. Каждый раз, работая в Excel, вы должны использовать функцию SQRT, которая дает квадратный корень любого целого числа в результате. Можно ли захватить квадратный корень из числа под VBA? Ну, ответ, конечно, да! Вы можете получить квадратный корень любого положительного числа через VBA, используя функцию VBA SQR. Эта функция является встроенной функцией VBA и может использоваться для любого положительного целого числа, чтобы получить ее квадратный корень. Ну, эта функция очень похожа на ту, которую мы используем в качестве функции электронной таблицы SQRT, а также принимаем тот же единственный аргумент «Число», который должен быть положительным. Мы также не можем получить квадратные корни мнимых чисел, и ввод отрицательных значений бесполезен, потому что нет никакого способа, которым можно получить отрицательное квадратное значение числа.
Синтаксис:
Синтаксис функции квадратного корня VBA довольно прост и похож на синтаксис функции SQRT электронной таблицы.
Где Number — это единственный аргумент, который необходимо указать и который должен быть строго положительным. Поскольку мы не можем иметь отрицательные квадратные значения любого числа, шансы получить отрицательное значение квадратного корня невозможны. Кроме того, нет возможности узнать квадратные корни комплексных чисел. Этот аргумент может быть предоставлен непосредственно в виде числа или переменной, назначенной номеру, или ссылки на ячейку электронной таблицы, где хранится число. Кроме того, следует отметить, что система по умолчанию считает аргумент, который вы задаете, двойным, чтобы получить квадратный корень для любого числа, независимо от того, является он целым квадратом или нет (пример 87 не является целый квадрат, но все равно получит значение квадратного корня, так как тип числа двойной. Вы все еще можете определить число как целое число, а затем использовать его в качестве аргумента функции SQR. Оно округляется до ближайшего значения квадратного корня, если число при условии, не полная площадь.
Как использовать функцию квадратного корня в Excel VBA?
Ниже приведены различные примеры использования функции квадратного корня в Excel VBA.
Вы можете скачать этот шаблон Excel с квадратным корнем VBA здесь — Шаблон Excel с квадратным корнем VBA
Квадратный корень VBA — Пример № 1
Выполните следующие действия, чтобы увидеть, как именно работает функция VBA SQR.
Шаг 1. Откройте вкладку « Разработчик » и щелкните значок Visual Basic (ALT + F11).
Шаг 2: Откройте модуль на вкладке меню «Вставка», как показано ниже.
Шаг 3: Определите новую подпроцедуру, которая может содержать макрос под вновь вставленным модулем.
Код:
Sub sqrt_Example1 () End Sub
Шаг 4: Используйте оператор присваивания, чтобы присвоить значение функции квадратного корня VBA переменной с именем « sqr_root », чтобы мы могли напечатать результат и посмотреть, работает ли он нормально.
Код:
Sub sqrt_Example1 () sqr_root = Sqr (121) End Sub
Шаг 5: Используйте функцию MsgBox, чтобы мы могли напечатать результат в виде окна сообщения, которое появится, как только мы запустим код.
Код:
Sub sqrt_Example1 () sqr_root = Sqr (121) MsgBox "Квадратный корень данного номера:" & sqr_root End Sub
Шаг 6: Запустите этот код, нажав F5 или кнопку Run, расположенную на самой верхней панели.
Как только вы запустите этот код, вы должны увидеть вывод, как показано ниже.
Квадратный корень VBA — Пример №2
Давайте углубимся в функцию SQR VBA и попытаемся выяснить несколько разных случаев.
Шаг 1: Определите подпроцедуру, которая может содержать ваши макросы.
Код:
Sub sqrt_Example2 () End Sub
Шаг 2: Нам нужно определить две новые переменные как целое число. Один для хранения значения, для которого мы хотим получить квадратный корень. Другая переменная будет для хранения результата квадратного корня после того, как мы применим функцию SQR.
Код:
Sub sqrt_Example2 () Dim square_num As Integer Dim square_root As Integer End Sub
Шаг 3: Присвойте значение как 87 переменной square_num, используя оператор присваивания (‘=’). Это число, для которого мы хотели получить значение квадратного корня.
Код:
Sub sqrt_Example2 () Dim square_num As Integer Dim square_root As Integer square_num = 87 End Sub
Шаг 4: Используйте функцию SQR и оператор присваивания, чтобы присвоить значение квадратного корня переменной square_root . Используйте square_num в качестве аргумента в функции SQR (число, для которого мы хотели получить значение квадратного корня).
Код:
Sub sqrt_Example2 () Dim square_num As Integer Dim square_root As Integer square_num = 87 square_root = Sqr (square_num) End Sub
Шаг 5: Используйте свойство MsgBox, чтобы показать значение квадратного корня в виде сообщения, которое появляется, как только вы запускаете код.
Код:
Sub sqrt_Example2 () Dim square_num As Integer Dim square_root As Integer square_num = 87 square_root = Sqr (square_num) MsgBox "Квадратный корень для заданного числа:" & square_root End Sub
Шаг 6: Запустите этот код, нажав кнопку F5 или Run, расположенную на самой верхней ленте VBE.
Шаг 7: Смотрите вывод в окне сообщения, как показано ниже:
Однако это не фактическое значение квадратного корня для числа 87. Это значение квадратного корня для числа 81. Почему в мире VBA дает неправильный вывод для функции SQR?
Ну, с VBA все в порядке. Если что-то не так, это идеально подходит для нашего кода.
Поскольку мы определили переменные как целые числа, мы ограничиваем VBA, чтобы давать квадратные корни только тех чисел, которые являются целыми квадратными числами (например, 4, 9, 16, 25 и т. Д.). Если какое-либо число не является целым квадратом, функция SQR VBA вместо выдачи ошибки выдает значение квадратного корня для числа, близкого к текущему числу. Здесь 87 имеет 81 как ближайшее целое квадратное число. Таким образом, вы получаете вывод как 9.
Шаг 8: Давайте посмотрим, что происходит, когда мы настраиваем код, определяя переменную square_root как Double вместо Integer.
Код:
Sub sqrt_Example2 () Dim square_num As Integer Dim square_root As Double square_num = 87 square_root = Sqr (square_num) MsgBox "Квадратный корень для заданного числа:" & square_root End Sub
Шаг 9: Вы увидите, что система теперь может зафиксировать фактическое значение квадратного корня для числа 87.
То, что нужно запомнить
- Если вы предоставите отрицательное число в качестве аргумента в функции SQR VBA, он выдаст ошибку времени выполнения «5» . Так как невозможно иметь число с отрицательными квадратными значениями.
- Если у вас есть отрицательное число, убедитесь, что вы преобразуете его в положительную сущность с помощью функции ABS. Вы также можете проверить, является ли число положительным или нет, с помощью функции SGN в VBA.
- Если вы установите ноль в качестве аргумента в функции VBA SQR, вы получите значение квадратного корня как ноль.
Рекомендуемые статьи
Это руководство по VBA Square Root. Здесь мы обсудим, как использовать функцию квадратного корня в Excel VBA вместе с практическими примерами и загружаемым шаблоном Excel. Вы также можете просмотреть наши другие предлагаемые статьи —
- VBA IF Заявления | Шаблоны Excel
- Как использовать функцию сортировки Excel VBA?
- VBA While Loop (Примеры с шаблоном Excel)
- Что такое счетчик VBA (примеры)?