Come dividere i valori delle celle verticalmente in Excel?
In Excel, puoi applicare il Testo in colonne funzione per dividere i valori della cella in più colonne orizzontalmente, ma non ti aiuta a dividere il contenuto della cella in più righe verticalmente. E in questo articolo, parlerò di alcuni modi rapidi per dividere i valori delle celle in righe verticalmente da un separatore specifico in Excel.
Dividi i valori delle celle in righe verticalmente mediante separatore con codice VBA
Dividi i valori delle celle in righe verticalmente tramite separatore con Kutools per Excel
Dividi i valori delle celle in righe verticalmente mediante separatore con codice VBA
Il seguente codice VBA può aiutarti a dividere i valori delle celle in righe verticalmente da qualsiasi separatore come desideri, per favore fai come segue:
1. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Clicchi inserire > Modulie incolla il codice seguente nel file Moduli Finestra.
Codice VBA: dividi i valori delle celle in righe verticalmente da un separatore specifico
Sub splitvertically()
'updatebyExtendoffice
Dim xRg As Range
Dim xOutRg As Range
Dim xCell As Range
Dim xTxt As String
Dim xStr As String
Dim xOutArr As Variant
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xOutRg = Application.InputBox("please select output cell:", "Kutools for Excel", , , , , , 8)
If xOutRg Is Nothing Then Exit Sub
For Each xCell In xRg
If xStr = "" Then
xStr = xCell.Value
Else
xStr = xStr & ";" & xCell.Value
End If
Next
xOutArr = VBA.Split(xStr, ";")
xOutRg.Range("A1").Resize(UBound(xOutArr) + 1, 1) = Application.WorksheetFunction.Transpose(xOutArr)
End Sub
3. Quindi premere F5 chiave per eseguire questo codice e verrà visualizzata una finestra di messaggio per ricordarti di selezionare i valori della cella che desideri dividere verticalmente, vedi screenshot:
4. E poi clicca OK pulsante, verrà visualizzata un'altra finestra per ricordarti di selezionare una cella per inserire il risultato, vedi screenshot:
5. Clic OK pulsante, ei valori della cella sono stati divisi in un elenco da un separatore, vedi screenshot:
Note:: Nel codice sopra, puoi cambiare il punto e virgola ; a qualsiasi altro delimitatore di cui hai bisogno.
Dividi i valori delle celle in righe verticalmente tramite separatore con Kutools per Excel
Kutools for Excel'S Celle divise è una potente utility, può aiutarti a dividere i valori delle celle in più colonne o righe con qualsiasi separatore di cui hai bisogno.
Kutools for Excel : con oltre 300 utili componenti aggiuntivi di Excel, da provare gratuitamente senza limitazioni in 30 giorni. |
Dopo l'installazione Kutools for Excel, si prega di fare come segue:
1. Seleziona le celle che desideri dividere in righe in base al delimitatore specifico.
2. Quindi fare clic Kutools > Unisci e dividi > Celle divise, vedi screenshot:
3. Nel Celle divise finestra di dialogo, selezionare Dividi in righe sotto il Tipologia sezione, quindi controlla Altro dal Dividi per sezione e inserisci il separatore su cui desideri dividere i valori della cella, vedi screenshot:
4. E poi clicca Ok pulsante, nella casella che si apre, seleziona una cella per visualizzare il risultato, vedi screenshot:
5. E fare clic su OK pulsante, i valori delle celle sono stati suddivisi in righe in base al separatore specifico come mostrato nella seguente schermata:
Scarica e prova gratuitamente Kutools per Excel ora!
Demo: dividi i valori delle celle in righe verticalmente tramite separatore con Kutools per Excel
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!