Lernen, wie man Excel " Roundup "-Funktion verwenden von seinem eingebauten Programmiersprache VBA oder Visual Basic für Applikationen , hilft Ihnen , eine beliebige Excel-Funktion von VBA. Diese Fähigkeit ist sehr nützlich, da Excel verfügt über viele Funktionen, die VBA nicht zu haben, und dass Sie brauchen, um aus einem VBA- Programm bewerben. Beachten Sie, dass die VBA -Funktion, die Sie in die " Roundup "-Funktion tippen können nicht warnen vor einer falschen Syntax oder ein Argument , wie es wäre , wenn mit dem Standard- Arbeitsblatt -Schnittstelle. Zweck
Die Excel " Roundup " -Funktion rundet eine Zahl nach oben, um die Anzahl der Ziffern, die Sie angeben . Zum Beispiel läuft " Roundup (2.2, 0) " weist Excel Sie wollen, dass es die Nummer 2.2 bis zur nächsten ganzen Zahl runden. Die "0" im zweiten Argument weist Excel Sie wollen keine Ziffern nach dem Komma , das entspricht sagen, Sie wollen eine ganze Antwort ist .
VBA Round -Funktion
VBA nicht über ein " Roundup "-Funktion in. Die nächste Funktion, die sie gebaut hat ist der " Round" -Funktion, die Runden nach oben oder unten , je nachdem ob der Endung Ziffer in der Zahl , du bist Rundung größer oder weniger als 5 ist. Zum Beispiel die Eingabe von " Round (2.2, 0 )" in VBA "Sofort" -Fenster führt zu einer 2 statt der 3 , dass die Excel " Roundup "-Funktion würde aufrunden .
"Formula " Property
Obwohl VBA keinen " Roundup " eigene Funktion , können es verwenden Excel " Roundup "-Funktion . Um anweisen VBA , dies zu tun , stellen Sie die "Formula " -Eigenschaft des "Range" virtuelles Objekt auf die " Roundup "-Funktion . Das folgende Beispiel zeigt Ihnen, wie Sie dies tun. Öffnen Sie die VBA-Entwicklungsumgebung mit der Taste " Alt" und " F11 " gleichzeitig aus Excel. Klicken Sie mit der Maus in den "Immediate "-Fenster , und geben Sie die folgende Anweisung : " Range (" A1 ") Formula =" = Roundup (2.2, 0) " " Return to Excel mit der "Alt -F11 " gerade beschrieben Tastendruck. . . Du wirst sehen, das Ergebnis " 3 " in Zelle A1, mit Angabe Ihrer Anweisung erfolgreich angewendet Excel " Roundup "-Funktion .
Interactive Beispiel
Sie eine interaktive machen kann VBA -Programm, das von einem Benutzer akzeptiert die Argumente für die " Roundup "-Funktion und zeigt das Ergebnis dieser Funktion nach dem Öffnen des VBA-Entwicklungsumgebung , das folgende Programm in das Fenster einfügen : .
Public Sub roundUpANumber ()
Dim a1 , a2, s
a1 = CDbl ( InputBox (" Geben Sie die Nummer , an die Sie runden möchten " ) )
a2 = CInt ( InputBox (" Geben Sie die Anzahl der Dezimalstellen , auf die Sie gerne die Nummer, die Sie gerade eingegeben runden würde . " ) )
s =" = Roundup ( " & a1 & ", " & a2 &") "
Range (" A1") . Formula = s
Range (" A1") . berechnen
MsgBox ( Range (" A1") . Value)
End Sub
