Excel VBA-Rundungsfunktion
Die Rundungsfunktion in VBA ist eine mathematische Funktion, die, wie der Name schon sagt, die angegebene Zahl auf den vom Benutzer angegebenen spezifischen Satz von Dezimalstellen auf- oder abrundet. Diese Funktion verwendet die Logik der Rundung, was bedeutet, dass 5 als Referenz und jede Zahl mit der letzten Ziffer nach der Dezimalstelle liegt unter 5, dann wird abgerundet und umgekehrt.
Sie können eine Zahl auf eine zweistellige Dezimalstelle, eine dreistellige Dezimalstelle oder gar keine Dezimalstelle runden. Zum Beispiel, wenn Sie die Nummer 5.8697 haben. Wenn Sie die Zahl auf eine zweistellige Dezimalstelle runden, beträgt sie 5,87. Wenn Sie auf drei Ziffern runden, wird auf 5.870 gerundet. Wenn Sie auf Null runden möchten, wird es 6.-
Bei Banknummern werden alle Dezimalstellen, die kleiner als 0,5 sind, auf den vorherigen ganzzahligen Wert abgerundet, und alle Dezimalstellen, die größer oder gleich 0,5 sind, werden auf den nächsten ganzzahligen Wert aufgerundet.
Ich hoffe, Sie haben die ROUND-Funktion im Arbeitsblatt verwendet. Auch in VBA können wir diese Funktion verwenden, aber wir haben einen Unterschied in diesen Funktionen. Wir werden den Unterschied zwischen diesen beiden Funktionen später in diesem Artikel sehen.
Syntax
Schauen Sie sich die Syntax der Round-Funktion an.
Nummer: Dies ist die Nummer, die wir runden möchten.
(Anzahl der Nachkommastellen): Wie viele Nachkommastellen benötigen Sie?
Beispiele
Angenommen, Sie haben die Nummer 4.534 und möchten auf zwei Ziffern runden.
Befolgen Sie die folgenden Schritte.
Schritt 1: Deklarieren Sie die Variable als Variante.
Code:
Sub Round_Example1 () Dim K As Variant End Sub
Schritt 2: Weisen Sie für diese Variable " k " den Wert über die Funktion ROUND zu.
Code:
Sub Round_Example1 () Dim K As Variant K = Round (End Sub
Schritt 3: Zahl ist nichts, aber was ist die Zahl, die wir runden wollen. In diesem Fall ist die Nummer 4.534
Code:
Sub Round_Example1 () Dim K As Variant K = Round (4.534, End Sub
Schritt 4: Wie viele Ziffern müssen gerundet werden? In diesem Fall müssen wir auf 2 Stellen runden .
Code:
Sub Round_Example1 () Dim K As Variant K = Round (4.534, 2) End Sub
Schritt 5: Zeigen Sie nun den Wert der Variablen "k" im Meldungsfeld VBA an.
Code:
Sub Round_Example1 () Dim K als Variante K = Round (4.534, 2) MsgBox K End Sub
Führen Sie diesen Code aus und sehen Sie, was wir bekommen.
Wir haben das Ergebnis als 4,53 erhalten, als wir auf 2 Stellen gerundet haben.
Jetzt werde ich die Nummer von 4.534 auf 4.535 ändern . Schau was jetzt passiert.
Code:
Sub Round_Example1 () Dim K als Variante K = Round (4.535, 2) MsgBox K End Sub
Führen Sie nun den Code aus und sehen Sie, was das Ergebnis ist.
Wir haben das Ergebnis mit 4,54 erhalten, eine Dezimalstelle höher als der vorherige Wert von 4,53. Dies liegt daran, dass wir in diesem Beispiel die Zahl wie 4,535 angegeben haben. Nachdem die nächste Zahl 3 also 5 ist, wird sie auf die nächste Zahl gerundet, sodass 3 zu 4 wird.
Jetzt werde ich die Nummer als 2.452678 angeben und versuchen, auf 3 Ziffern zu runden.
Code:
Sub Round_Example2 () Dim K als Variante K = Round (2.452678, 3) MsgBox K End Sub
Führen Sie diesen Code aus, um das Ergebnis anzuzeigen.
Das Ergebnis ist 2.453 .
2.45 2678 Hier Zahlen nach dem 2 nd Dezimalstelle sind 2678. Nach Nummer 2 ist die nächste Nummer 6, die größer oder gleich 5 ist , so dass es auf die nächste dezimale Zahl aufzurunden.
Jetzt werde ich dieselbe Zahl verwenden, um auf Null zu runden und zu sehen, was passiert.
Code:
Sub Round_Example3 () Dim K als Variante K = Round (2.452678, 0) MsgBox K End Sub
Führen Sie den Code aus und sehen Sie, was wir bekommen.
Da ich die Runde auf Null verwendet habe, haben wir das Ergebnis als 2 erhalten.
Der Grund, warum wir das Ergebnis als 2 erhalten haben, weil hier die erste Dezimalzahl 4 ist, was kleiner als die 0,5 ist, also abgerundet wird.
Unterschied zwischen Excel und VBA ROUND-Funktion
Es gibt hauptsächlich 2 Unterschiede.
# 1 - Syntax beider Funktionen:
Wenn Sie sich die Syntax beider Funktionen ansehen, haben wir hier einen Unterschied.
Excel Round Syntax: Round (Anzahl, Anzahl der Nachkommastellen)
VBA Round Syntax: Round (Anzahl, (Anzahl der Nachkommastellen))
In Excel sind beide Argumente obligatorisch, in VBA ist das zweite Argument optional.
Wenn Sie in VBA das zweite Argument ignorieren, wird das Standardargument als Null verwendet, sodass wir die ganze Zahl erhalten.
# 2 - Ergebnisse:
Die Ergebnisse dieser beiden Funktionen sind unterschiedlich. Nachfolgend einige Beispiele
