Come dividere per delimitatore e trasporre celle in Excel?
In questo articolo, presento i modi per dividere un intervallo in base a un delimitatore specifico e quindi trasporlo in Excel come mostrato nell'immagine sottostante. Se sei interessato a questa attività, vai ai dettagli di seguito.
Dividi e trasponi con Kutools per Excel
Dividi e trasponi con VBA
Non esiste un modo diretto per dividere e trasporre i dati con un delimitatore specifico, ma posso introdurre un codice VBA per aiutarti a risolvere rapidamente questo problema.
1. Stampa Alt + F11 tasti da visualizzare Microsoft Visual Basic, Applications Edition finestra.
2. Clic inserire > Modulie incolla il codice sottostante nel nuovo Moduli finestra.
VBA: Dividi e trasponi
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 Sub3. Stampa F5 tasto per eseguire il codice, viene visualizzata una finestra di dialogo per selezionare un intervallo da dividere e trasporre.
4. Clic OK. Viene visualizzata una finestra di dialogo per selezionare una posizione in cui posizionare i dati.
5. Clic OKe la selezione è stata divisa e trasposta da virgola.
Dividi e trasponi con Kutools per Excel
Con Kutools for Excel, puoi applicarlo Celle divise in primo luogo per dividere le celle per delimitatore, quindi applicare il Trasforma intervallo utilità per convertire le celle in una colonna.
| Kutools for Excel, con oltre 300 funzioni utili, rende il tuo lavoro più facile. |
Dopo l'installazione Kutools per Excel, fai come di seguito :(Scarica gratuitamente Kutools per Excel adesso!)
1. Selezionare le celle che si desidera dividere e fare clic Kutools > Unisci e dividi > Celle divise. Vedi screenshot:
2. Nel Celle divise dialogo, controlla Dividi in colonne opzione, quindi specificare il delimitatore su cui si desidera suddividere in base, fare clic su Ok. E seleziona una cella vuota per inserire il risultato nel secondo Celle divise dialogo. Vedi screenshot:
3. Clic OK, quindi le celle sono state suddivise in colonne, quindi fai clic su Kutools > Escursione > Trasforma intervallo. Vedi screenshot:
4. Nel Trasforma intervallo dialogo, controlla Intervallo su singola colonna, fare clic su Oke seleziona una cella per posizionare il risultato. Vedi screenshot:
5. Clic OK, ora la gamma è stata trasposta in una colonna.
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
