Funkcia Excel VBA Square Root (SQR)
Vo VBA máme zabudovanú funkciu s názvom „SQR“, táto funkcia vráti druhú odmocninu pre dané číslo uvedené vo vstupe. Funkcia Square Root vyžaduje pre svoju funkciu iba jeden argument, tj. Number.
SQRT je druhá odmocnina v programoch Excel aj VBA. Metóda na použitie tejto funkcie je nasledovná SQR (číslo) a používa sa na výpočet druhej odmocniny daného čísla v programe Excel; nomenklatúra je však iná a píše sa ako SQRT v porovnaní so SQR vo VBA.
Ďalej je uvedená syntax funkcie SQR.
Číslo: Pre tento argument musíme zadať číslo, pre ktoré sa snažíme nájsť druhú odmocninu. Číslo môže byť priamou dodávkou čísla alebo čísla priradeného premennej, alebo je platné číslo s odkazom na bunku.
Táto funkcia je k dispozícii ako s funkciami hárka, tak aj s funkciou VBA, ale v hárku je k dispozícii ako SQRT.
Príklady druhej odmocniny v programe Excel VBA
Príklad č
Teraz sa pokúsime napísať kód, aby sme našli druhú odmocninu pre číslo 64.
Najskôr spustite podprogram VBA.
Kód:
Sub Square_Root_Example () End Sub
Definujte dve premenné ako Celé číslo, jednou je uloženie čísla a druhou zobrazenie výsledku druhej odmocniny.
Kód:
Sub Square_Root_Example () Dim ActualNumber As Integer Dim SquareNumber As Integer End Sub
Pre premennú „ActualNumber“ priraďte hodnotu číslo 64.
Kód:
Sub Square_Root_Example () Dim ActualNumber As Integer Dim SquareNumber As Integer ActualNumber = 64 End Sub
Pre inú premennú priradíme druhú odmocninu, zadáme názov premennej, dáme rovnaký sing a otvoríme funkciu SQR.
Jediným argumentom funkcie SQR je „Number“, pretože sme už premennej „ActualNumber“ priradili číslo 64, dodajme vo funkcii SQR rovnaký názov premennej.
Ďalej ukážte výsledok v okne správy. Teraz je druhej premennej pridelené premennej „SquareNumber“, ktorý zobrazuje rovnaký názov premennej v okne správy.
Kód:
Sub Square_Root_Example () Dim ActualNumber As Integer Dim SquareNumber As Integer ActualNumber = 64 SquareNumber = Sqr (ActualNumber) MsgBox SquareNumber End Sub
Dobre, to je všetko, čo sme skončili s programovaním.
Spustite kód pomocou klávesovej skratky F5 programu Excel a uvidíte, čo dostaneme v schránke správ.
Druhá odmocnina čísla 64 je 8, tj 8 * 8 = 64
Príklad č
Pri výpočte sqrt vo VBA musíme mať na pamäti ešte jednu vec, keď je premenný údajový typ buď celé číslo alebo dlhý, výsledok sa zaokrúhli na najbližšie celé číslo alebo na celé číslo.
Napríklad, ak sa pokúšate nájsť druhú odmocninu pre číslo 70, neexistuje pre ňu druhá odmocnina, ale vo VBA sa zobrazí ako 8 iba preto, že 8 je najbližšia celočíselná hodnota druhej odmocniny.
Pozrite sa na nasledujúci kód.
Kód:
Sub Square_Root_Example1 () Dim ActualNumber As Integer Dim SquareNumber As Integer ActualNumber = 70 SquareNumber = Sqr (ActualNumber) MsgBox SquareNumber End Sub
Skutočný výsledok odmocniny pre číslo 70 je 836666, ale pri VBA sa zaokrúhli na najbližšiu celočíselnú hodnotu 8.
Jednou z vecí, ktorú môžeme urobiť pre nápravu tejto chyby, je zmena dátového typu premennej „SquareNumber“ na „Double“.
Kód:
Sub Square_Root_Example1 () Dim ActualNumber ako celé číslo Dim SquareNumber ako dvojnásobok ActualNumber = 70 SquareNumber = Sqr (ActualNumber) MsgBox SquareNumber End Sub
Teraz spustite kód ručne alebo pomocou klávesu F5 a pozrite si výsledok.
Ako vidíte, výsledok je teraz presný, tj. 8 366 602. Je to tak kvôli dátovému typu, ktorý sme priradili premennej „SquareNumber“.
Na čo treba pamätať
- Vo VBA nájdeme druhú odmocninu číselného vzorca SQR a v hárku je to SQRT.
- Číslo, ktoré dodávame funkcii SQR, by malo byť kladné číslo, inak dostaneme # ČÍSLO! chyba.
