Функція квадратного кореня Excel VBA

У цій статті ми побачимо контур на квадратному корені Excel VBA. Кожен раз, працюючи над Excel, ви повинні використовувати функцію SQRT, яка дає результат квадратного кореня будь-якого цілого числа. Чи можливо захопити квадратний корінь числа під VBA? Ну, відповідь впевнена! Так! Ви можете отримати квадратний корінь будь-якого додатного числа через VBA за допомогою функції VBA SQR. Ця функція є вбудованою функцією VBA і її можна використовувати в будь-якому додатному цілому цілому, щоб отримати квадратний корінь її. Ну, ця функція дуже схожа на функцію, яку ми використовуємо як функцію електронних таблиць SQRT, а також бере один і той же аргумент «Число», який повинен бути позитивним. Ми також не можемо отримати квадратні корені уявних чисел, і введення негативних значень не є корисним, оскільки не існує можливого способу зафіксувати від'ємне квадратне значення числа.

Синтаксис:

Синтаксис функції квадратного кореня VBA досить простий і схожий на функцію SQRT електронної таблиці.

Де число - єдиний аргумент, який потрібно надати і повинен бути суворо позитивним. Оскільки ми не можемо мати від'ємних квадратних значень жодного числа, шанси отримати негативне значення квадратного кореня неможливо. Також немає можливості для знаходження квадратних коренів складних чисел. Цей аргумент може бути наданий безпосередньо у вигляді числа або змінної, присвоєної номеру або посиланню комірки електронної таблиці, де зберігається число. Крім того, тут слід зазначити, що система за замовчуванням розглядає аргумент, який ви надаєте, як подвійний, щоб дати вам квадратний корінь на будь-яке число, незалежно від того, це цілий квадрат чи ні (Приклад 87, це не цілий квадрат, але все одно отримає значення кореня квадрата, оскільки тип числа подвійний. Ви все одно можете визначити число як ціле число, а потім використовувати його як аргумент функції SQR. Він буде округнути до найближчого значення кореня квадрата, якщо число за умови, що це не цілий квадрат.

Як використовувати функцію квадратного кореня в Excel VBA?

Нижче наведено різні приклади використання функції Square Root в Excel VBA.

Ви можете завантажити шаблон VBA Square Root Excel тут - Шаблон VBA Square Root Excel

Квадратний корінь VBA - приклад №1

Виконайте наведені нижче дії, щоб побачити, як саме працює функція VBA SQR.

Крок 1: Перейдіть на вкладку Developer, а потім натисніть значок Visual Basic (ALT + F11).

Крок 2: Відкрийте модуль на вкладці меню Вставка, як показано нижче.

Крок 3: Визначте нову підпроцедуру, яка може містити макрос під нещодавно вставленим модулем.

Код:

 Sub sqrt_Example1 () Кінець Sub 

Крок 4: Використовуйте оператор присвоєння, щоб призначити значення кореневої функції VBA квадратній змінній під назвою " sqr_root ", щоб ми могли надрукувати результат і побачити, чи добре він працює.

Код:

 Sub sqrt_Example1 () sqr_root = Sqr (121) Кінець Sub 

Крок 5: Використовуйте функцію MsgBox, щоб ми змогли надрукувати результат у вигляді повідомлення, яке з’явиться, як тільки ми запустимо код.

Код:

 Sub sqrt_Example1 () sqr_root = Sqr (121) MsgBox "Квадратний корінь заданого числа становить:" & sqr_root Кінець Sub 

Крок 6: Запустіть цей код, натиснувши клавішу F5 або кнопку «Запустити», розміщену на верхній панелі.

Як тільки ви запустите цей код, ви побачите вихід, як показано нижче.

Квадратний корінь VBA - приклад №2

Давайте зануримось глибше у функцію VQ SQR і спробуємо з’ясувати деякі різні випадки.

Крок 1. Визначте підпроцедуру, яка може містити ваші макроси.

Код:

 Sub sqrt_Example2 () Кінець 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 Кінець 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) Кінець Sub 

Крок 5: Використовуйте властивість MsgBox, щоб показати значення квадратного кореня як повідомлення, яке з'являється, як тільки ви запустите код.

Код:

 Sub sqrt_Example2 () Dim square_num As Integer Dim square_root As Integer square_num = 87 square_root = Sqr (square_num) 

Крок 6: Запустіть цей код, натиснувши кнопку F5 або Запустити, яка розміщена на верхній стрічці VBE.

Крок 7: Дивіться вихід у вікні повідомлень, як показано нижче:

Однак це не фактичне значення квадратного кореня для числа 87. Це квадратне значення кореня для числа 81. Чому у світі VBA дає неправильний вихід для функції SQR?

Що ж, з VBA немає нічого поганого. Якщо щось не так, це ідеально з нашим кодом.

Оскільки ми визначили змінні як цілі числа, ми обмежуємо VBA давати квадратні корені лише тих чисел, які є цілими квадратними числами (Приклади 4, 9, 16, 25 тощо). Якщо будь-яке число не є цілим квадратом, функція SQR VBA замість того, щоб видавати помилку, вона дає квадратне значення кореня для числа, близького до поточного числа. Тут 87 має 81 як найближче ціле число квадратних. Тому ви отримуєте вихід як 9.

Крок 8: Давайте подивимося, що станеться, коли ми налаштуємо код, визначивши змінну square_root як подвійну замість цілого .

Код:

 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.

Що потрібно пам’ятати

  • Якщо ви вказали від'ємне число в якості аргументу в рамках функції VBA SQR, воно видасть помилку під час виконання "5" . Оскільки неможливо мати число з від’ємними квадратними значеннями.
  • Якщо у вас від’ємне число, переконайтеся, що ви перетворюєте його на позитивне сутність за допомогою функції ABS. Ви також можете перевірити, чи є число позитивним чи ні, за допомогою функції SGN під VBA.
  • Якщо ви поставите нуль як аргумент під функцією VBA SQR, ви отримаєте квадратне значення кореня як нуль.

Рекомендовані статті

Це путівник по квадратному кореня VBA. Тут ми обговорюємо, як використовувати функцію Square Root в Excel VBA разом із практичними прикладами та шаблоном Excel, який можна завантажити. Ви також можете ознайомитися з іншими запропонованими нами статтями -

  1. Виписки VBA IF | Шаблони Excel
  2. Як використовувати функцію сортування Excel VBA?
  3. VBA while цикл (приклади з шаблоном Excel)
  4. Що таке лічильник VBA (приклади)?

Категорія: