Wie rundet man einen Zahlenbereich auf gerade Zahlen in Excel?
Was ist das Runden auf gerade Zahlen in Excel? Das Runden auf gerade Zahlen wird auch als Bankerrundung bezeichnet. Im Grunde funktioniert es wie normales Runden, außer wenn die zu rundende Zahl eine 5 ist. Wenn die Ziffer vor der 5 ungerade ist, sollten Sie aufrunden, und wenn die Ziffer vor der 5 gerade ist, sollten Sie abrunden.
Zum Beispiel würde 23,345 auf gerade Zahlen auf der Hundertstelstelle gerundet werden zu 23,34 und 12,335 auf gerade Zahlen auf der Hundertstelstelle gerundet werden zu 12,34.
In diesem Artikel werde ich darüber sprechen, wie man die Bankerrundung in Excel durchführt.
Zahlen mit einer benutzerdefinierten Funktion auf gerade Zahlen runden
Zahlen mit VBA-Code auf gerade Zahlen runden
Zahlen mit Kutools für Excel auf gerade Zahlen runden
Zahlen mit einer benutzerdefinierten Funktion auf gerade Zahlen runden
Sie können die folgende definierte Funktion verwenden, um Zahlen in Excel auf gerade Zahlen zu runden. Gehen Sie bitte wie folgt vor:
1. Wählen Sie die Zahlen aus, die Sie auf gerade Zahlen runden möchten.
2. Halten Sie dann die Tasten ALT + F11 gedrückt, und es öffnet sich das Fenster Microsoft Visual Basic for Applications.
3. Klicken Sie auf Einfügen > Modul, und fügen Sie das folgende Makro im Modulfenster ein.
Function BankersRound(num, precision)
BankersRound = Round(num, precision)
End Function
4. Speichern Sie den Code, und geben Sie die Formel = bankersround(a1,2) in die angrenzende leere Zelle ein. Siehe Screenshot:
5. Drücken Sie dann die Eingabetaste. Wählen Sie die Zelle B1 aus, und ziehen Sie den Ausfüllkursor über den Bereich, den Sie mit dieser Formel füllen möchten. Siehe Screenshot:
Zahlen mit VBA-Code auf gerade Zahlen runden
Wenn Sie die definierte Funktion nicht verwenden möchten, kann Ihnen der folgende VBA-Code ebenfalls helfen. Gehen Sie wie folgt vor:
1. Wählen Sie den Bereich aus, den Sie auf gerade Zahlen runden möchten.
2. Halten Sie dann die Tasten ALT + F11 gedrückt, und es öffnet sich das Fenster Microsoft Visual Basic for Applications.
3. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden Code im Modulfenster ein.
Sub RoundToEven()
'Update 20131107
Dim rng As Range
Dim WorkRng As Range
Dim intNumberOfDecimal As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
intNumberOfDecimal = Application.InputBox("NumberOfDecimal", xTitleId, Type:=1)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeConstants, xlNumbers)
For Each rng In WorkRng
rng.Value = Round(rng.Value, intNumberOfDecimal)
Next
End Sub4. Drücken Sie dann die Taste F5, um diesen Code auszuführen. Geben Sie im Eingabefeld die Anzahl der Dezimalstellen ein, auf die Sie runden möchten. Siehe Screenshot:
5. Klicken Sie dann auf OK, alle ausgewählten Zahlen wurden auf gerade Zahlen gerundet. Siehe Screenshots:
 |  |  |
Zahlen mit Kutools für Excel auf gerade Zahlen runden
Weder die benutzerdefinierte Funktion noch der VBA-Code erscheinen Ihnen komplex, ich kann Ihnen eine einfache Methode vorstellen, dies zu lösen. Mit der Funktion Runden ohne Formel von Kutools für Excel können Sie schnell einen Zahlenbereich auf gerade Zahlen runden.
Kutools für Excel enthält mehr als 300 praktische Excel-Tools. Kostenlos 30 Tage lang testen ohne Einschränkungen. Holen Sie es sich jetzt.
Nach der Installation von Kutools für Excel können Sie wie folgt vorgehen:
1. Markieren Sie den Bereich, den Sie auf gerade Zahlen runden möchten.
2. Klicken Sie auf Kutools > Runden.
3. Geben Sie im Dialogfeld Runden ohne Formel die benötigten Dezimalstellen ein, und wählen Sie unter Option Runden auf Gerade aus. Sie können das Ergebnis im Vorschaufenster anzeigen. Siehe Screenshot:
4. Klicken Sie dann auf OK oder Übernehmen, alle Zahlen werden auf gerade Zahlen mit 2 Dezimalstellen gerundet.
Klicken Sie auf Runden auf Gerade, um mehr über diese Funktion zu erfahren.
Verwandter Artikel:
Runden / Aufrunden / Abrunden eines Zellbereichs in Excel
Die besten Produktivitätstools für das Büro
Stärken Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und genießen Sie Effizienz wie nie zuvor. Kutools für Excel bietet mehr als300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt die Tab-Oberfläche in Office und macht Ihre Arbeit wesentlich einfacher
- Aktivieren Sie die Tabulator-Bearbeitung und das Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Tabs innerhalb desselben Fensters, statt in neuen Einzelfenstern.
- Steigert Ihre Produktivität um50 % und reduziert hunderte Mausklicks täglich!
Alle Kutools-Add-Ins. Ein Installationspaket
Das Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro und ist ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- All-in-One-Paket — Add-Ins für Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Ein Installationspaket, eine Lizenz — in wenigen Minuten einsatzbereit (MSI-kompatibel)
- Besser gemeinsam — optimierte Produktivität in allen Office-Anwendungen
- 30 Tage kostenlos testen — keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis — günstiger als Einzelkauf der Add-Ins