Comment diviser par délimiteur et transposer des cellules dans Excel?
Dans cet article, je présente les moyens de diviser une plage par un délimiteur spécifique, puis de la transposer dans Excel comme illustré ci-dessous. Si vous êtes intéressé par cette tâche, veuillez consulter les détails ci-dessous.
Diviser et transposer avec VBA
Diviser et transposer avec Kutools for Excel
Diviser et transposer avec VBA
Il n'y a pas de moyen direct de fractionner et de transposer les données par un délimiteur spécifique, mais je peux introduire un code VBA pour vous aider à résoudre ce problème rapidement.1. presse Alt + F11 touches à afficher Microsoft Visual Basic pour applications fenêtre.
2. Cliquez insérer > Moduleet collez ci-dessous le code dans le nouveau Module fenêtre.
VBA: fractionner et transposer
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. presse F5 pour exécuter le code, une boîte de dialogue apparaît pour vous permettre de sélectionner une plage à diviser et à transposer.
4. Cliquez OK. Une boîte de dialogue apparaît pour sélectionner un emplacement pour placer les données.
5. Cliquez OK, et la sélection a été divisée et transposée par une virgule.
Diviser et transposer avec Kutools for Excel
Avec Kutools for Excel, vous pouvez appliquer son Cellules divisés d'abord pour diviser les cellules par délimiteur, puis appliquer le Transformer la gamme utilitaire pour convertir les cellules en une colonne.
Kutools for Excel, avec plus de 300 fonctions pratiques, rend vos travaux plus faciles. |
Après l'installation de Kutools pour Excel, veuillez faire comme ci-dessous :(Téléchargez gratuitement Kutools pour Excel maintenant!)
1. Sélectionnez les cellules que vous souhaitez fractionner, puis cliquez sur Kutools > Fusionner et fractionner > Cellules divisés. Voir la capture d'écran:
2. dans le Cellules divisés boîte de dialogue, vérifier Fractionner en colonnes , puis spécifiez le délimiteur sur lequel vous souhaitez fractionner, cliquez sur Ok. Et sélectionnez une cellule vide pour placer le résultat dans la seconde Cellules divisés dialogue. Voir la capture d'écran:
3. Cliquez OK, puis les cellules ont été divisées en colonnes, puis cliquez sur Kutools > Catégorie > Transformer la gamme. Voir la capture d'écran:
4. dans le Transformer la gamme boîte de dialogue, vérifier Plage à une seule colonnecliquez Oket sélectionnez une cellule pour placer le résultat. Voir la capture d'écran:
5. Cliquez OK, maintenant la plage a été transposée en une colonne.
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!