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
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 Podat žádost, 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ší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
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!