Hvordan afrunder række af tal til lige i Excel?
Hvad er runde til lige i Excel? Afrunding til endda også kaldet bankrunding, dybest set er det ligesom normal afrunding, undtagen når det nummer, der skal afrundes, er nummer 5. Hvis cifret før 5 er ulige, skal du afrunde op, og hvis cifferet før 5 er selv, skal du afrunde.
For eksempel: 23.345 runde til lige på percentilen ville være 23.34. og 12.335 runde til lige på percentilen ville være 12.34.
I denne artikel vil jeg tale om, hvordan man gør bankrunder afrunding i Excel.
Afrund numre til lige med brugerdefineret funktion
Afrund tal til lige med VBA-kode
Afrund tal til lige med Kutools til Excel
Afrund numre til lige med brugerdefineret funktion
Du kan bruge følgende definerede funktion til at afrunde tal til lige i Excel. Gør følgende:
1. Vælg de tal, du vil afrunde til lige.
2. Hold derefter nede ALT + F11 tasterne, og det åbner Microsoft Visual Basic til applikationer vindue.
3. Klik indsatte > Moduler, og indsæt følgende makro i modulvinduet.
Funktion BankersRound (num, precision)
BankersRound = Round (num, precision)
End Function
4. Gem koden, og indtast formlen = bankersround (a1,2) ind i den tilstødende tomme celle. Se skærmbillede:
5. Tryk derefter på Indtast nøgle. Og vælg celle B1, træk derefter fyldhåndtaget over til det område, som du vil indeholde denne formel. Se skærmbillede:
Afrund tal til lige med VBA-kode
Hvis du ikke vil bruge den definerede funktion, kan følgende VBA-kode også hjælpe dig. Gør som dette:
1. Vælg det område, du vil afrunde til lige.
2. Hold derefter nede ALT + F11 tasterne, og det åbner Microsoft Visual Basic til applikationer vindue.
3. Klik indsatte > Moduler, og indsæt følgende kode i ModulerVindue.
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. Tryk derefter på F5 nøgle for at køre denne kode, i indtastningsfeltet skal du indtaste antallet af decimaler, du vil afrunde. Se skærmbillede:
5. Klik derefter på OK, er alle de valgte numre afrundet til lige. Se skærmbilleder:
 |
 |
 |
Afrund tal til lige med Kutools til Excel
Hverken den brugerdefinerede funktion eller VBA-koden kan du føle dig så kompleks, at jeg kan introducere dig en nem måde at løse det på. Med Runde uden formel of Kutools til Excel, kan du hurtigt afrunde en række numre til lige.
Kutools til Excel indeholder mere end 300 praktiske Excel-værktøjer. Gratis at prøve uden begrænsning på 30 dage. Få det nu.
Efter installation af Kutools til Excel kan du gøre som følger:
1. Fremhæv det område, du vil afrunde til jævnt.
2. Klik Kutools > Rund, se skærmbillede:
3. I Runde uden formel i dialogboksen, indtast det decimal, du har brug for, og vælg derefter Runde til lige under Option, og du kan forhåndsvise resultatet fra Forhåndsvis pane. Se skærmbillede:
4. Klik derefter på OK or Indløs, afrundes alle numre til lige med 2 decimaler.
Klik på Runde til lige for at vide mere om denne funktion.
Relateret artikel:
Rund / rund op / rund ned en række celletal i Excel
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
