Hvordan opdeles ved at afgrænse og transponere celler i Excel?
I denne artikel introducerer jeg måderne til at opdele et interval efter specifik afgrænser og derefter transponere det i Excel som vist nedenstående skærmbillede. Hvis du er interesseret i denne opgave, skal du gå til nedenstående detaljer.
Opdel og transponér med Kutools til Excel
Opdel og transponér med VBA
Der er ingen direkte måde at opdele og transponere data på med en bestemt afgrænser, men jeg kan introducere en VBA-kode for at hjælpe dig med at løse dette problem hurtigt.1. Trykke Alt + F11 taster, der skal vises Microsoft Visual Basic til applikationer vindue.
2. klik indsatte > Moduler, og indsæt nedenstående kode til den nye Moduler vindue.
VBA: Opdel og transponér
Sub Vertical()
'UpdatebyExtendoffice20161125
Dim i As Long, strTxt As String
Dim startP As Range
Dim xRg As Range, yRg As Range
On Error Resume Next
Set xRg = Application.InputBox _
(Prompt:="Range Selection...", _
Title:="Kutools For Excel", Type:=8)
i = 1
Application.ScreenUpdating = False
For Each yRg In xRg
If i = 1 Then
strTxt = yRg.Text
i = 2
Else
strTxt = strTxt & "," & yRg.Text
End If
Next
Application.ScreenUpdating = True
Set startP = Application.InputBox _
(Prompt:="paste range...", _
Title:="Kutools For Excel", Type:=8)
ary = Split(strTxt, ",")
i = 1
Application.ScreenUpdating = False
For Each a In ary
startP(i, 1).Value = a
i = i + 1
Next a
Application.ScreenUpdating = True
End Sub
3. Trykke F5 nøgle til at køre koden, vises der en dialogboks, hvor du kan vælge et område, du vil opdele og transponere.
4. klik OK. Der vises en dialogboks for at vælge et sted, hvor dataene placeres.
5. klik OK, og markeringen er opdelt og transponeret med komma.
Opdel og transponér med Kutools til Excel
Med Kutools til Excel, kan du anvende dens Opdel celler først at opdele celler ved at afgrænse og derefter anvende Transformér rækkevidde værktøj til at konvertere cellerne til en kolonne.
Kutools til Excel, med mere end 300 praktiske funktioner, der gør dine job lettere. |
Efter installation Kutools til Excel, gør venligst som nedenfor :(Gratis download Kutools til Excel nu!)
1. Vælg de celler, du vil opdele, og klik på Kutools > Flet og del > Opdel celler. Se skærmbillede:
2. i Opdel celler dialog, tjek Opdel til kolonner valgmulighed, og angiv derefter den afgrænser, du vil opdele baseret på, klik på Ok. Og vælg en tom celle for at placere resultatet i den anden Opdel celler dialog. Se skærmbillede:
3. klik OK, så er cellerne opdelt i kolonner, og klik derefter på Kutools > Range > Transformér rækkevidde. Se skærmbillede:
4. i Transformér rækkevidde dialog, tjek Område til enkelt kolonneklik Ok, og vælg en celle for at placere resultatet. Se skærmbillede:
5. klik OK, nu er området blevet transponeret i en kolonne.
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!