Hvordan opdeles ord eller tal i separate celler i Excel?
Hvis du har en liste med tal eller ord i et regneark, og nu er du nødt til at opdele celleindholdet i bogstaver på forskellige celler som vist nedenstående skærmbillede, hvordan kan du håndtere dette job i Excel?
Opdel ord eller tal i separate celler med formlen
Med følgende enkle formel kan du adskille celleindholdet på forskellige celler hurtigt og bekvemt.
1. I en tom celle ved siden af dine data, f.eks. C1, skal du indtaste denne formel = MIDT ($ A1, KOLONNER ($ A $ 1: A $ 1), 1), se skærmbillede:
2. Træk derefter fyldhåndtaget over til de rigtige celler, indtil der vises tomme celler, og indholdet i celle A1 er opdelt i separate celler.
3. Og fortsæt derefter med at trække påfyldningshåndtaget ned til det område, som du vil anvende denne formel, og alle data i kolonne A vil blive adskilt på forskellige celler, som du vil. Se skærmbillede:
Opdel ord eller tal i separate celler med VBA-kode
Hvis du er interesseret i VBA-kode, kan følgende kode også gøre dig en tjeneste.
1. Hold nede ALT + F11 nøgler i Excel for at åbne Vinduet Microsoft Visual Basic til applikationer.
2. Klik indsatte > Moduler, og indsæt følgende kode i Modul vindue.
VBA-kode: Opdel ord i separate celler
Sub SplitStuff()
'Updateby Extendoffice
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Application.ScreenUpdating = False
For Each Rng In InputRng
xValue = Rng.Value
xRow = Rng.Row
For i = 1 To VBA.Len(xValue)
OutRng.Cells(xRow, i).Value = VBA.Mid(xValue, i, 1)
Next
Next
Application.ScreenUpdating = True
End Sub
3. Tryk derefter på F5 nøgle til at køre denne kode, og et promptfelt vil minde dig om at vælge det dataområde, du vil bruge, se skærmbillede:
4. Klik OK, og en anden meddelelsesboks vil dukke op for at fortælle dig at vælge en celle til at finde resultatet.
5. Klik derefter på OK, og ordene eller numrene i de valgte celler er opdelt til individuelle tegn. Se skærmbillede:
Opdel ord eller tal i separate celler med Kutools til Excel
Kutools til Excel's Opdel celler funktion er et kraftfuldt værktøj, der kan hjælpe dig med at opdele celleindhold i adskilte kolonner eller rækker med specifikke afgrænsere, på samme tid kan det også adskille teksten og nummeret i to kolonner.
Kutools til Excel : med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. |
Efter installation kutools til Excelskal du gøre som følger:
1. Vælg de celler, du vil opdele.
2. Klik derefter på Kutools > Flet og del > Opdel celler, se skærmbillede:
3. I Opdel celler dialogboks, vælg venligst Opdel til kolonner under Type, så tjek Angiv bredde under Opdel ved sektion, og indtast nummeret 1 i tekstboksen, hvilket betyder at opdele ordet i adskilte celler efter hvert enkelt tegn. Se skærmbillede:
4. Klik derefter på Ok knap, vises en anden promptboks for at minde dig om at vælge en celle for at output resultatet, se skærmbillede:
5. Og klik derefter på OK, celleindholdet i markeringen er opdelt til individuelle tegn. Se skærmbillede:
Download og gratis prøveversion Kutools til Excel nu!
Opdel ord eller tal i separate celler med Kutools til Excel
Kombiner adskilte bogstaver eller tal i ét ord eller tal
Kombiner adskilte bogstaver eller tal i ét ord eller tal
Hvis du vil kombinere disse adskilte cellebogstaver i et ord i modsætning til ovenstående metoder, Kutools til Excel's Kombiner hjælpeprogram kan hjælpe dig med at kombinere dem i en celle så hurtigt som muligt. Kutools til Excel: med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. Download og gratis prøveversion nu! |
Relaterede artikler:
Hvordan udpakkes første / sidste / nte ord fra tekststreng i Excel?
Hvordan udtrækker første bogstav i hvert ord fra celle?
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!