Excel VBA Square Root (SQR) -Funktion
In VBA haben wir eine eingebaute Funktion namens "SQR". Diese Funktion gibt die Quadratwurzel für die angegebene Zahl in der Eingabe zurück. Die Quadratwurzelfunktion benötigt nur ein Argument für ihre Funktion, nämlich Number.
SQRT ist eine Quadratwurzelfunktion sowohl in Excel als auch in VBA. Die Methode zur Verwendung dieser Funktion lautet wie folgt: SQR (Zahl) und zur Berechnung der Quadratwurzel einer bestimmten Zahl in Excel; Die Nomenklatur ist jedoch anders und wird im Vergleich zu SQR in VBA als SQRT geschrieben.
Unten finden Sie die Syntax der SQR-Funktion.
Zahl: Für dieses Argument müssen wir die Zahl angeben, für die wir versuchen, die Quadratwurzel zu finden. Die Nummer kann eine direkte Angabe einer Nummer oder Nummer sein, die der Variablen zugewiesen ist, oder eine Nummer mit Zellreferenz ist gültig.
Diese Funktion ist sowohl für Arbeitsblattfunktionen als auch für die VBA-Funktion verfügbar. In einem Arbeitsblatt ist sie jedoch als SQRT verfügbar.
Beispiele für Quadratwurzel in Excel VBA
Beispiel 1
Jetzt werden wir versuchen, Code zu schreiben, um die Quadratwurzel für die Zahl 64 zu finden.
Starten Sie zunächst die VBA-Subroutine.
Code:
Sub Square_Root_Example () End Sub
Definieren Sie zwei Variablen als Ganzzahl, eine dient zum Speichern der Zahl und eine andere zum Anzeigen des Ergebnisses des Quadratwurzelwerts.
Code:
Sub Square_Root_Example () Dim ActualNumber As Integer Dim SquareNumber As Integer End Sub
Weisen Sie für die Variable "ActualNumber" den Wert Nummer 64 zu.
Code:
Sub Square_Root_Example () Dim ActualNumber als Ganzzahl Dim SquareNumber als Ganzzahl ActualNumber = 64 End Sub
Für eine andere Variable weisen wir den Quadratwurzelwert zu, geben den Variablennamen ein, setzen gleich sing und öffnen die SQR-Funktion.
Das einzige Argument der SQR-Funktion ist "Number", da wir der Variablen "ActualNumber" bereits die Nummer 64 zugewiesen haben. Geben Sie in der SQR-Funktion denselben Variablennamen an.
Zeigen Sie als Nächstes das Ergebnis im Meldungsfeld an. Jetzt wird die Quadratwurzelnummer der Variablen "SquareNumber" zugewiesen. Der gleiche Variablenname wird im Meldungsfeld angezeigt.
Code:
Sub Square_Root_Example () Dim ActualNumber als Ganzzahl Dim SquareNumber als Ganzzahl ActualNumber = 64 SquareNumber = Sqr (ActualNumber) MsgBox SquareNumber End Sub
Ok, das ist alles, was wir mit dem Codieren gemacht haben.
Führen Sie den Code mit der Excel-Tastenkombination F5 aus und sehen Sie, was im Meldungsfeld angezeigt wird.
Die Quadratwurzel der Zahl 64 ist 8, dh 8 * 8 = 64
Beispiel 2
Eine weitere Sache, die wir bei der Berechnung von sqrt in VBA berücksichtigen müssen, ist, dass das Ergebnis auf den nächsten ganzzahligen oder ganzzahligen Wert gerundet wird, wenn der variable Datentyp entweder ganzzahlig oder lang ist.
Wenn Sie beispielsweise versuchen, die Quadratwurzel für die Zahl 70 zu finden, gibt es dafür keine Quadratwurzel. In VBA wird sie jedoch nur als 8 angezeigt, da 8 der nächste ganzzahlige Quadratwurzelwert ist.
Schauen Sie sich den folgenden Code an.
Code:
Sub Square_Root_Example1 () Dim ActualNumber As Integer Dim SquareNumber As Integer ActualNumber = 70 SquareNumber = Sqr (ActualNumber) MsgBox SquareNumber End Sub
Das tatsächliche Ergebnis der Quadratwurzelzahl für 70 ist 8,3666, aber mit VBA wird auf den nächsten ganzzahligen Wert 8 gerundet.
Um diesen Fehler zu beheben, müssen wir den Datentyp der Variablen "SquareNumber" in "Double" ändern.
Code:
Sub Square_Root_Example1 () Dim ActualNumber As Integer Dim SquareNumber As Double ActualNumber = 70 SquareNumber = Sqr (ActualNumber) MsgBox SquareNumber End Sub
Führen Sie nun den Code manuell oder über die Taste F5 aus und sehen Sie das Ergebnis.
Wie Sie sehen können, ist das Ergebnis jetzt genau, dh 8.366602. Dies liegt an dem Datentyp, den wir der Variablen "SquareNumber" zugewiesen haben.
Dinge, an die man sich erinnern sollte
- In VBA lautet die Quadratwurzel der Zahlenformel SQR und im Arbeitsblatt SQRT.
- Die Zahl, die wir der SQR-Funktion geben, sollte eine positive Zahl sein, sonst erhalten wir #NUM! Error.
