Hvordan formateres nummer som ordinal (1. 2. 3.) i Excel?
I nogle tilfælde er vi nødt til at formatere nummer som 1., 2., 3. osv., Når vi rangerer som vist nedenstående skærmbillede. Men ved du, hvordan du formaterer disse hovednumre som ordinære tal i Excel? Generelt er der ingen indbygget funktion til at konvertere nummer som 1. i Excel, men her kan jeg introducere nogle tricks til dette problem.
Formater nummer som ordinal med VBA
Formatér nummer som ordinal med Kutools til Excel
Formater nummer som ordinal med VBA
For at formatere nummer som ordinær, her er en makro kode, der kan hjælpe dig.
1. Trykke Alt + F11 taster for at aktivere Microsoft Visual Basic til applikationer vindue.
2. klik indsatte > Moduler, og indsæt under VBA til modulskriptet. Se skærmbillede:
VBA: Formater nummer som ordinær
Function Addth(pNumber As String) As String
'UpdatebyExtendoffice20160628
Select Case CLng(VBA.Right(pNumber, 1))
Case 1
Addth = pNumber & "st"
Case 2
Addth = pNumber & "nd"
Case 3
Addth = pNumber & "rd"
Case Else
Addth = pNumber & "th"
End Select
Select Case VBA.CLng(VBA.Right(pNumber, 2))
Case 11, 12, 13
Addth = pNumber & "th"
End Select
End Function
3. Vælg derefter en tom celle ud for det nummer, du vil formatere som ordinær, f.eks. C2, og indtast denne formel = Tilsætning (B2), B2 er det nummer, du bruger, og tryk på Indtast nøgle, og træk derefter håndtaget til autofyldning over de celler, du vil anvende denne formel. Se skærmbillede:
Formatér nummer som ordinal med Kutools til Excel
Hvis du ikke er god til at udføre makro-kode, kan du prøve at anvende Kutools til Excel's Konverter nummer til ordinært værktøj, som bare har brug for et enkelt klik for at håndtere jobbet.
Kutools til Excel, med mere end 300 praktiske funktioner, der gør dine job lettere. |
Efter gratis installation Kutools til Excel, gør venligst som nedenfor:
Vælg de numre, du vil formatere som ordinær, og klik på Kutools > Indhold > Konverter nummer til ordinært. Se skærmbillede:
Konverter nummer til ordinært
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!