VBA Quadratwurzel

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 wird zur Berechnung der Quadratwurzel einer bestimmten Zahl in Excel verwendet. Die Nomenklatur ist jedoch unterschiedlich und wird als SQRT im Vergleich geschrieben zu SQR in VBA.

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 mit der Arbeitsblattfunktion als auch mit der VBA-Funktion verfügbar, in einem Arbeitsblatt jedoch als SQRT.

Beispiele für Quadratwurzel in Excel VBA

Sie können diese VBA SQRT-Funktions-Excel-Vorlage hier herunterladen - VBA SQRT-Funktions-Excel-Vorlage

Beispiel 1

Jetzt werden wir versuchen, Code zu schreiben, um die Quadratwurzel für die Zahl 64 zu finden.

Starten Sie zuerst 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.

Als nächstes zeigen Sie das Ergebnis im Meldungsfeld. Jetzt wird die Quadratwurzelnummer der Variablen "SquareNumber" zugewiesen. Im Meldungsfeld wird derselbe Variablenname 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 getan 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, wenn das variable Datentyp entweder ganzzahlig oder lang ist, wird das Ergebnis auf den nächsten ganzzahligen oder ganzzahligen Wert gerundet.

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 ist die Quadratwurzel der Zahlenformel SQR und im Arbeitsblatt SQRT.
  • Die Nummer, die wir der SQR-Funktion geben, sollte eine positive Nummer sein, sonst erhalten wir #NUM! Error.