Exceli VBA ruutjuure (SQR) funktsioon
VBA-s on meil sisseehitatud funktsioon nimega “SQR”, see funktsioon tagastab sisendis toodud arvu ruutjuure. Ruutjuure funktsioon nõuab funktsiooni jaoks ainult ühte argumenti, st arvu.
SQRT on ruutjuure funktsioon nii excelis kui ka VBA-s. Selle funktsiooni kasutamise meetod on järgmine SQR (arv) ja seda kasutatakse Excelis antud arvu ruutjuure arvutamiseks; nomenklatuur on siiski erinev ja see on kirjutatud kui SQRT võrreldes VQS-i SQR-ga.
Allpool on SQR-funktsiooni süntaks.
Number: Selle argumendi jaoks peame sisestama numbri, mille ruutjuurt leida üritame. Numbriks võib olla muutujale määratud numbri või numbri otsene pakkumine või kehtib lahtriviitega number.
See funktsioon on saadaval nii töölehe kui ka VBA funktsiooniga, kuid töölehel on see saadaval SQRT-na.
Ruudujuure näited Exceli VBA-s
Näide 1
Nüüd proovime koodi 64 ruutjuure leidmiseks kirjutada koodi.
Kõigepealt käivitage VBA alamprogramm.
Kood:
Alamruut_Juur_näide () Lõpeta alam
Määrake kaks muutujat täisarvuna, üks on numbri salvestamine ja teine ruutjuure väärtuse tulemuse kuvamine.
Kood:
Alamruut_Juur_näide () Hämarda tegelik number tervikuna Hämar ruutnumber täisarvu lõpuna Alamruut
Määrake muutuja „ActualNumber” jaoks arvu 64 väärtus.
Kood:
Alamruut_Juur_näide () Hämarda tegelik number tervikuna Hämar ruutu number täisarvuna Tegelik number = 64 Lõpp-alam
Teise muutuja jaoks määrame ruutjuure väärtuse, sisestame muutuja nime, paneme võrdse singi ja avame funktsiooni SQR.
Funktsiooni SQR ainus argument on „Number”, kuna oleme juba määranud muutujale „ActualNumber” numbri 64, esitame funktsioonis SQR sama muutuja nime.
Järgmisena kuvage tulem sõnumikastis. Nüüd on ruutjuure number määratud muutujale. „SquareNumber“ näitab sama muutuja nime sõnumikastis.
Kood:
Alamruut_Juur_näide () Hämarda tegelik number tervikuna Hämar ruutu number täisarvuna Tegelik number = 64 Ruudu number = ruut (Tegelik number) MsgBox Ruudu number Lõpp alam
Ok, see on kõik, mis meil kodeerimisega tehtud on.
Käivitage kood Exceli otseteeklahvi F5 abil ja vaadake, mida me teate kasti saame.
Numbri 64 ruutjuur on 8, st 8 * 8 = 64
Näide 2
Sqrt arvutamisel VBA-s peame meeles pidama veel ühte asja, kui muutuja andmetüüp on kas täisarv või pikk, tulemus ümardatakse lähima täis- või täisarvu väärtuseni.
Näiteks kui proovite leida ruutjuure numbrile 70, pole selle jaoks ruutjuurt, kuid VBA-s näitab see ainult 8, kuna 8 on lähim ruutjuure täisarv.
Vaadake allolevat koodi.
Kood:
Alamruut_Juur_näide1 () Hämarda tegelik number tervikuna Hämar ruutu number täisarvuna Tegelik number = 70 Ruudu number = ruut (Tegelik number) MsgBox Ruudu number Lõpp alam
Tegelik ruutjuure numbri 70 tulemus on 8,3666, kuid VBA korral ümardatakse see lähima täisarvuni 8.
Üks asi, mida saame selle vea kõrvaldamiseks teha, on see, et peame muutuja “SquareNumber” andmetüübi asendama “Double”.
Kood:
Alamruut_Juur_näide1 () Hämarda tegelik number tervikuna Hämar ruutnumber kahekordse tegeliku numbrina = 70 Ruudu number = ruut (Tegelik number) MsgBox Ruudu number Lõpp alam
Nüüd käivitage kood käsitsi või klahvi F5 kaudu ja vaadake tulemust.
Nagu näete, on tulemus nüüd täpne, st 8.366602. Selle põhjuseks on andmetüüp, mille oleme määranud muutujale „SquareNumber”.
Asjad, mida meeles pidada
- VBA-s on numbrivalemi ruutjuure leidmiseks SQR ja töölehel SQRT.
- Funktsioonile SQR edastatud number peaks olema positiivne arv, muidu saame #NUM! viga.
