Excel VBA Square Root-funksjon
I denne artikkelen vil vi se en oversikt over Excel VBA Square Root. Hver gang du jobber med Excel, må du ha brukt SQRT-funksjonen som gir kvadratroten av et hvilket som helst heltal som resultat. Er det mulig å fange kvadratroten til et nummer under VBA? Vel, svaret er et sikkert Ja! Du kan få kvadratroten til et hvilket som helst positivt tall gjennom VBA ved å bruke VBA SQR-funksjonen. Denne funksjonen er en innebygd VBA-funksjon og kan brukes på et hvilket som helst positivt heltall for å få kvadratroten av den. Vel, denne funksjonen er veldig lik den som vi bruker som regnearkfunksjon SQRT og tar også det samme argumentet “Number” som burde være positivt. Vi kan ikke få kvadratrøttene til imaginære tall heller, og å legge inn negative verdier er ikke til noen nytte fordi det ikke er noen mulig måte en negativ kvadratverdi på et tall å fange opp.
syntaks:
Syntaks for VBA kvadratrotfunksjon er ganske enkel og ligner på den i regnearkets SQRT-funksjon.
Hvor nummer er et eneste argument som må fremmes og bør være strengt positive. Siden vi ikke kan ha noen negative kvadratverdier av noe tall, er sjansene for å få en negativ kvadratrotverdi umulig. Heller ikke noe rom for å finne ut kvadratrotene til de komplekse tallene. Dette argumentet kan gis direkte som et nummer eller en variabel som er tilordnet nummeret eller en regnearkcellehenvisning der nummeret er lagret. Poenget som skal bemerkes her er at system som standard anser argumentet du gir som en dobbel for å gi deg kvadratroten på et hvilket som helst tall, uavhengig av at det er en hel firkant eller ikke (Eks. 87, er ikke hele kvadratet, men vil fremdeles få kvadratrotverdien siden talltypen er dobbelt. Du kan fremdeles definere et tall som et heltall og deretter bruke det som et argument til SQR-funksjonen. Det vil runde til den nærmeste kvadratrotverdien hvis tallet gitt er ikke et helt torg.
Hvordan bruke Square Root-funksjon i Excel VBA?
Nedenfor er de forskjellige eksemplene for å bruke Square Root-funksjonen i Excel VBA.
Du kan laste ned denne VBA Square Root Excel-malen her - VBA Square Root Excel-malVBA Square Root - Eksempel nr. 1
Følg trinnene nedenfor for å se nøyaktig hvordan VBA SQR-funksjonen fungerer.
Trinn 1: Klikk på kategorien Utvikler og klikk deretter på Visual Basic (ALT + F11) -ikonet.
Trinn 2: Åpne modulen fra Sett inn menyfanen som vist nedenfor.
Trinn 3: Definer en ny delprosedyre som kan holde makroen under den nylig innsatte modulen.
Kode:
Sub sqrt_Example1 () Slutt Sub
Trinn 4: Bruk tildelingsoperatøren til å tilordne verdien til VBA-kvadratrotfunksjonen til en variabel som heter “ sqr_root ”, slik at vi kan skrive ut resultatet og se om det fungerer bra.
Kode:
Sub sqrt_Example1 () sqr_root = Sqr (121) Slutt Sub
Trinn 5: Bruk MsgBox-funksjonen slik at vi kan skrive ut resultatet som en meldingsboks som dukker opp så snart vi kjører koden.
Kode:
Sub sqrt_Example1 () sqr_root = Sqr (121) MsgBox "Square Root of given Number is:" & sqr_root End Sub
Trinn 6: Kjør denne koden ved å trykke på F5 eller Run-knappen plassert på det øverste panelet.
Så snart du kjører denne koden, skal du se en utgang som vist nedenfor.
VBA Square Root - Eksempel # 2
La oss dykke dypere i VBA SQR-funksjonen og prøve å finne ut noen forskjellige tilfeller.
Trinn 1: Definer delprosedyre som kan inneholde makroene dine.
Kode:
Sub sqrt_Example2 () Slutt Sub
Trinn 2: Vi må definere to nye variabler som heltall. En for å lagre verdien som vi ønsker en firkantet rot for. En annen variabel vil være å lagre resultatet av kvadratroten etter at vi har brukt SQR-funksjonen.
Kode:
Sub sqrt_Example2 () Dim square_num As Integer Dim square_root Som Integer End Sub
Trinn 3: Tildel verdi som 87 til square_num- variabelen ved hjelp av tildelingsoperatøren ('='). Dette er tallet vi ønsket å fange opp kvadratrotverdien for.
Kode:
Sub sqrt_Example2 () Dim square_num As Integer Dim square_root Som Integer square_num = 87 End Sub
Trinn 4: Bruk SQR-funksjonen og tildelingsoperatøren for å tilordne verdien av kvadratroten til square_root- variabelen. Bruk square_num som et argument under SQR-funksjonen (tallet vi ønsket kvadratrotverdien for).
Kode:
Sub sqrt_Example2 () Dim square_num As Integer Dim square_root Som Integer square_num = 87 square_root = Sqr (square_num) End Sub
Trinn 5: Bruk MsgBox Property for å vise verdien av kvadratroten som en melding som dukker opp så snart du kjører koden.
Kode:
Sub sqrt_Example2 () Dim square_num As Integer Dim square_root Som Integer square_num = 87 square_root = Sqr (square_num) MsgBox "Square Root for given Number is:" & square_root End Sub
Trinn 6: Kjør denne koden ved å trykke på F5 eller Run-knappen som er plassert på det øverste båndet til VBE.
Trinn 7: Se utdataene i en meldingsboks som vist nedenfor:
Dette er imidlertid ikke den faktiske kvadratrotverdien for nummer 87. Dette er kvadratrotverdien for nummer 81. Hvorfor i all verden gir VBA feil output for SQR-funksjon?
Det er ikke noe galt med VBA. Hvis noe er galt, er det ideelt med koden vår.
Siden vi har definert variablene som heltall, begrenser vi VBA til å gi kvadratrotene til bare de tallene som er hele kvadratnummer (Eks. 4, 9, 16, 25, etc.). Hvis noe tall ikke er et helt kvadrat, fungerer VBA SQR-funksjonen i stedet for å kaste en feil, det gir en kvadratrotverdi for et tall som er nær det gjeldende tallet. Her har 87 81 som det nærmeste hele kvadratnummeret. Derfor får du utdataene som 9.
Trinn 8: La oss se hva som skjer når vi finjusterer koden ved å definere square_root- variabelen som Double i stedet for Integer.
Kode:
Sub sqrt_Example2 () Dim square_num As Integer Dim square_root As Double square_num = 87 square_root = Sqr (square_num) MsgBox "Square Root for given Number is:" & square_root End Sub
Trinn 9: Du vil se at systemet nå kan fange opp den faktiske kvadratrotverdien for nummeret 87.
Ting å huske
- Hvis du oppgir et negativt tall som et argument under VBA SQR-funksjonen, vil det kaste en kjøretidsfeil '5' . Siden det ikke er mulig å ha et tall med negative kvadratverdier.
- Hvis du har et negativt tall, må du sørge for å konvertere det til en positiv enhet ved hjelp av ABS-funksjonen. Du kan også sjekke om tallet er positivt eller ikke ved hjelp av SGN-funksjonen under VBA.
- Hvis du setter null som et argument under VBA SQR-funksjonen, vil du få kvadratrotverdien som null.
Anbefalte artikler
Dette er en guide til VBA Square Root. Her diskuterer vi hvordan du bruker Square Root Function i Excel VBA sammen med praktiske eksempler og nedlastbar Excel-mal. Du kan også gå gjennom andre foreslåtte artikler -
- VBA IF-uttalelser | Excel-maler
- Hvordan bruke Excel VBA sorteringsfunksjon?
- VBA While Loop (eksempler med Excel-mal)
- Hva er VBA Counter (eksempler)?