Jak zaokrouhlit rozsah čísel rovnoměrně v aplikaci Excel?

Co se zaokrouhlí na sudé v aplikaci Excel? Zaokrouhlení na sudé také nazývané zaokrouhlování bankéřů, v zásadě je to jako normální zaokrouhlování, kromě případů, kdy je číslo, které má být zaokrouhleno, číslo 5. Pokud je číslice před 5 lichá, měli byste zaokrouhlovat nahoru a pokud je číslice před 5 dokonce byste měli zaokrouhlit dolů.

Například, 23.345 zaokrouhlení na rovnoměrné na percentilu by bylo 23.34. a 12.335 zaokrouhlení na rovnoměrné na percentilu by bylo 12.34.

V tomto článku budu mluvit o tom, jak provést zaokrouhlování bankéřů v aplikaci Excel.

Zaokrouhlete čísla na rovnoměrně pomocí funkce definované uživatelem

Zaokrouhlete čísla na rovnoměrně s kódem VBA

Zaokrouhlete čísla na vyrovnaná s programem Kutools pro Excel

Zaokrouhlete čísla na rovnoměrně pomocí funkce definované uživatelem

Úžasný! Používání efektivních karet v aplikaci Excel, jako jsou Chrome, Firefox a Safari!

Ušetřete 50% svého času a snížíte tisíce kliknutí myší každý den!

---

Následující definovanou funkci můžete použít k zaokrouhlování čísel rovnoměrně v aplikaci Excel. Postupujte prosím následovně:

1. Vyberte čísla, která chcete zaokrouhlit na sudá.

2. Poté přidržte tlačítko ALT + F11 klíče a otevře se Microsoft Visual Basic pro aplikace okno.

3, klikněte Vložit > Modula vložte následující makro do okna modulu.

Funkce BankersRound (počet, přesnost)
BankersRound = Round (počet, přesnost)
End Function

4. Uložte kód a zadejte vzorec = bankersround (a1,2) do sousední prázdné buňky. Viz snímek obrazovky:

5. Pak stiskněte tlačítko vstoupit klíč. Vyberte buňku B1 a poté přetáhněte úchyt výplně do rozsahu, ve kterém chcete tento vzorec obsahovat. Viz snímek obrazovky:

Zaokrouhlete čísla na rovnoměrně s kódem VBA

Pokud nechcete používat definovanou funkci, pomůže vám také následující kód VBA. Postupujte takto:

1. Vyberte rozsah, který chcete zaokrouhlit na rovnoměrné.

2. Poté přidržte tlačítko ALT + F11 klíče a otevře se Microsoft Visual Basic pro aplikace okno.

3, klikněte Vložit > Modula vložte následující kód do ModulOkno.

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 Sub

4. Poté stiskněte tlačítko F5 klíč ke spuštění tohoto kódu, do pole výzvy zadejte počet desetinných míst, která chcete zaokrouhlit. Viz snímek obrazovky:

5. Pak klikněte na tlačítko OK, všechna vybraná čísla byla zaokrouhlena na sudá. Zobrazit snímky obrazovky:

Zaokrouhlete čísla na vyrovnaná s programem Kutools pro Excel

Uživatelem definovaná funkce ani kód VBA se vám nemohou zdát tak složité, mohu vám představit snadný způsob, jak to vyřešit. S Kolo bez vzorce of Kutools pro Excel, můžete rychle zaokrouhlit rozsah čísel na sudá.

Kutools pro Excel obsahuje více než 300 užitečných nástrojů aplikace Excel. Zdarma to můžete vyzkoušet bez omezení do 30 dnů. Získat nyní.

Po instalaci aplikace Kutools pro Excel můžete postupovat následovně:

1. Zvýrazněte rozsah, který chcete zaokrouhlit na rovnoměrný.

2, klikněte Kutools > Kolo, viz screenshot:

3. V Kolo bez vzorce V dialogovém okně zadejte desetinné místo, které potřebujete, a poté vyberte Zaokrouhlené na sudé pod Volbaa můžete zobrazit náhled výsledku z Podokno náhledu. Viz snímek obrazovky:

4. Pak klikněte na tlačítko OK or aplikovat, všechna čísla budou zaokrouhlena na sudá dvě desetinná místa.

Kliknutím na Zaokrouhlit rovnoměrně získáte další informace o této funkci.

Související článek:

Zaokrouhlit / zaokrouhlit nahoru / zaokrouhlit rozsah čísel buněk v aplikaci Excel

---

Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

• Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
• Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
• Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
• Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
• Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
• Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
• Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
• Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
• Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2021 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Plné funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.

Čtěte více... Stažení zdarma... Nákup... 

---

Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

• Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
• Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
• Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!

Čtěte více... Stažení zdarma... Nákup...