Note: The other languages of the website are Google-translated. Back to English

Comment diviser les valeurs séparées par des virgules en lignes ou en colonnes dans Excel?

Dans certains cas, vous devrez peut-être diviser les valeurs séparées par des virgules des cellules sélectionnées en lignes ou en colonnes. Ici, nous allons vous présenter trois méthodes pour résoudre ce problème en détail.

Divisez les valeurs séparées par des virgules en colonnes avec la fonction Texte en colonnes
Diviser les valeurs séparées par des virgules en lignes avec le code VBA
Divisez rapidement les valeurs séparées par des virgules en lignes ou en colonnes avec Kutools for Excel


Divisez les valeurs séparées par des virgules en colonnes avec la fonction Texte en colonnes

Vous pouvez appliquer la fonction Texte aux colonnes pour diviser les valeurs séparées par des virgules des cellules sélectionnées en colonnes. Veuillez faire comme suit.

1. Sélectionnez la plage de cellules dont vous souhaitez diviser les valeurs en colonnes, puis cliquez sur Données > Texte aux colonnes. Voir la capture d'écran:

2. Dans le premier Assistant de conversion de texte en colonnes boîte de dialogue, sélectionnez le Délimité , puis cliquez sur le Suivant .

3. Dans le second Assistant de conversion de texte en colonnes boîte de dialogue, cochez uniquement Virgule boîte dans la Delimiters section, et cliquez sur Suivant .

4. Dans le dernier Assistant de conversion de texte en colonnes boîte de dialogue, sélectionnez une cellule pour localiser les valeurs de fractionnement dans le Destination et enfin cliquez sur le Récapitulatif bouton. Voir la capture d'écran:

Maintenant, toutes les valeurs dans les cellules sélectionnées qui étaient séparées par des virgules sont divisées en différentes colonnes comme illustré ci-dessous.

Normalement, le Texte dans les colonnes La fonctionnalité ne divise que les cellules en colonnes séparées, si vous souhaitez diviser les cellules en lignes, comment pouvez-vous faire?
Ici, le Kutools pour Excel's Cellules divisés L'utilitaire peut vous aider à diviser rapidement les cellules par espace, virgule, nouvelle ligne, autres séparateurs ou une certaine largeur non seulement en lignes séparées, mais également en colonnes dans Excel. Téléchargez Kutools for Excel maintenant! (Parcours gratuit de 30 jours)


Diviser les valeurs séparées par des virgules en lignes avec le code VBA

Pour diviser les valeurs séparées par des virgules en lignes, vous pouvez appliquer le code VBA suivant.

1. appuie sur le autre + F11 touches simultanément pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module. Ensuite, copiez et collez le code VBA ci-dessous dans la fenêtre Module.

Code VBA: diviser les valeurs séparées par des virgules en lignes

Sub SplitAll()
	Dim xRg As Range
	Dim xRg1 As Range
	Dim xCell As Range
	Dim I As Long
	Dim xAddress As String
	Dim xUpdate As Boolean
	Dim xRet As Variant
	On Error Resume Next
	xAddress = Application.ActiveWindow.RangeSelection.Address
	Set xRg  = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
	Set xRg  = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
	If xRg Is Nothing Then Exit Sub
		If xRg.Columns.Count > 1 Then
			MsgBox "You can't select multiple columns", , "Kutools for Excel"
			Exit Sub
			End If
			Set xRg1 = Application.InputBox("Split to (single cell):", "Kutools for Excel", , , , , , 8)
			Set xRg1 = xRg1.Range("A1")
			If xRg1 Is Nothing Then Exit Sub
				xUpdate = Application.ScreenUpdating
				Application.ScreenUpdating = False
				For Each xCell In xRg
					xRet = Split(xCell.Value, ",")
					xRg1.Worksheet.Range(xRg1.Offset(I, 0), xRg1.Offset(I + UBound(xRet, 1), 0)) = Application.WorksheetFunction.Transpose(xRet)
					I = I + UBound(xRet, 1) + 1
				Next
				Application.ScreenUpdating = xUpdate
			End Sub

3. appuie sur le F5 clé pour exécuter le code. Dans le popping Kutools pour Excel boîte de dialogue, sélectionnez les cellules à fractionner, puis cliquez sur le OK .

4. Dans le deuxième pop-up Kutools pour Excel boîte de dialogue, sélectionnez une cellule pour localiser les valeurs de fractionnement, puis cliquez sur OK.

Ensuite, vous pouvez voir que les valeurs séparées par des virgules dans les cellules sélectionnées sont divisées en lignes comme illustré ci-dessous.


Divisez rapidement les valeurs séparées par des virgules en lignes ou en colonnes avec Kutools for Excel

The Cellules divisés utilité de Kutools pour Excel peut vous aider à diviser facilement les valeurs séparées par des virgules en lignes ou en colonnes.

1. Sélectionnez les cellules que vous devez 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, sélectionnez Fractionner en lignes or Fractionner en colonnes à l' Catégorie section selon vos besoins. Et dans le Spécifiez un séparateur section, sélectionnez Autres option, entrez le symbole de la virgule dans la zone de texte, puis cliquez sur le OK bouton. Voir la capture d'écran:

3.Et puis une autre boîte de dialogue apparaîtra pour vous rappeler de sélectionner une cellule pour afficher le résultat, voir capture d'écran:

4. Cliquez OK bouton, vous pouvez voir les résultats comme ci-dessous les captures d'écran montrées.

Fractionner en colonnes

Fractionner en lignes

  Si vous souhaitez bénéficier d'un essai gratuit (30 jours) de cet utilitaire, veuillez cliquer pour le télécharger, puis passez à appliquer l'opération selon les étapes ci-dessus.


Démo: divisez rapidement les valeurs séparées par des virgules en lignes ou en colonnes avec Kutools for Excel


Les meilleurs outils de productivité de bureau

Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%

  • Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtréeplus
  • Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammesplus
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellulesplus
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDFplus
  • Plus de 300 fonctionnalités puissantes. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Essai gratuit de 30 jours. Garantie de remboursement de 60 jours.
onglet kte 201905

Office Tab apporte une interface à onglets à Office et simplifie considérablement 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!
bas de cabine
Commentaires (11)
Pas encore de notes. Soyez le premier à évaluer!
Ce commentaire a été minimisé par le modérateur sur le site
Bon, l'utilitaire m'aide beaucoup. Merci pour ça... :)
Ce commentaire a été minimisé par le modérateur sur le site
Alternativement, pour séparer en lignes, utilisez les étapes de texte en colonne, puis copiez et collez -> transposer pour transformer les colonnes en lignes.
Ce commentaire a été minimisé par le modérateur sur le site
Merci Jacques ! C'est ce que je cherchais. :)
Ce commentaire a été minimisé par le modérateur sur le site
Merci !
Ce commentaire a été minimisé par le modérateur sur le site
C'est incroyable, merci de l'avoir rendu gratuit et facile à utiliser !
Ce commentaire a été minimisé par le modérateur sur le site
Merci ça m'a aidé :)
Ce commentaire a été minimisé par le modérateur sur le site
Allez dans le fichier Excel Data option -> text to column-> delimited -> Done
il crachera une valeur séparée par des virgules dans une colonne individuelle
exemple

id nom ajouter

1 Ratnesh monAjouter

2, Yog, monAjouter


nous appliquerons dans le 2ème enregistrement, il divisera l'enregistrement comme le 1er enregistrement,


Merci,
Ratnesh Sahu
Ce commentaire a été minimisé par le modérateur sur le site
Allez dans le fichier Excel Data option -> text to column-> delimited -> Done
il crachera une valeur séparée par des virgules dans une colonne individuelle
exemple
id nom ajouter
1 Ratnesh monAjouter
2, Yog, monAjouter
nous appliquerons dans le 2ème enregistrement, il divisera l'enregistrement comme le 1er enregistrement,
Merci,
Ratnesh Sahu
Ce commentaire a été minimisé par le modérateur sur le site
je ne peux toujours pas télécharger mon csv dans 365
Ce commentaire a été minimisé par le modérateur sur le site
A jak zmienić kod żeby nie pytał o ustawienie się w A1 i potem aby wynik był np też od A1 w dół
Ce commentaire a été minimisé par le modérateur sur le site
Salut Bartec,
Vous voulez dire que vous ne voulez pas afficher la deuxième boîte de dialogue pour sélectionner la cellule cible et que vous souhaitez spécifier directement la cellule cible dans le code ?
Si c'est le cas, vous devez modifier les lignes suivantes.
Par exemple, vous devez commencer à produire les résultats de B1 et remplir automatiquement.
Veuillez modifier cette ligne :
Set xRg1 = Application.InputBox("Split to (single cell):", "Kutools for Excel", , , , , , 8)
à
Définir xRg1 = Application.Range("B2")
Et puis supprimez la ligne suivante :
Définir xRg1 = xRg1.Range("A1")
Il n'y a pas encore de commentaires postés ici
Laisser vos commentaires
Publier en tant qu'invité
×
Évaluez cet article:
0   Personnages
Emplacements suggérés