Excel : Comment diviser un texte délimité en lignes

Lorsque vous travaillez avec des données dans Excel, vous pouvez rencontrer des cellules contenant plusieurs informations séparées par des délimiteurs tels que des virgules, des espaces ou des points-virgules. Diviser ce texte en lignes distinctes peut être essentiel pour une meilleure analyse et organisation des données. Heureusement, Excel propose diverses méthodes pour accomplir cette tâche efficacement. Voici un guide étape par étape sur la façon de diviser un texte délimité en lignes.

Diviser un texte délimité en lignes à l'aide de VBA

Diviser un texte délimité en lignes avec Kutools pour Excel

Diviser un texte délimité en lignes avec POWER QUERY

Voici un code VBA qui peut rapidement diviser un texte délimité en lignes.

1. Appuyez sur les touches "Alt + F11" pour activer la fenêtre "Microsoft Visual Basic for Applications".

2. Cliquez sur "Insérer" > "Module" pour créer un nouveau module vide.

3. Copiez et collez le code ci-dessous dans le module vide.

VBA : Diviser un texte délimité en lignes

Public Sub SplitTextInCellsToRows()
'UpdatebyExtendoffice20220622
    Dim xSRg, xIptRg, xCrRg, xRg As Range
    Dim xSplitChar As String
    Dim xArr As Variant
    Dim xFNum, xFFNum, xRow, xColumn, xNum As Integer
    Dim xWSh As Worksheet
    Set xSRg = Application.InputBox("Select a range:", "Kutools for Excel", , , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    xSplitChar = Application.InputBox("Type delimiter:", "Kutools for Excel", , , , , , 2)
    If xSplitChar = "" Then Exit Sub

    Application.ScreenUpdating = False
    xRow = xSRg.Row
    xColumn = xSRg.Column
    Set xWSh = xSRg.Worksheet
    For xFNum = xSRg.Rows.Count To 1 Step -1
        
        Set xRg = xWSh.Cells.Item(xRow + xFNum - 1, xColumn)
        Debug.Print xRg.Address
        xArr = Split(xRg, xSplitChar)
        For xFFNum = LBound(xArr) To UBound(xArr)
            xRg.EntireRow.Copy
            xRg.Offset(1, 0).EntireRow.Insert Shift:=xlShiftDown
            xRg.Worksheet.Cells(xRow + xFNum, xColumn) = xArr(xFFNum)
        Next
        xRg.EntireRow.Delete
    Next
    Application.CutCopyMode = False
    Application.ScreenUpdating = True
End Sub

4. Appuyez sur la touche F5 pour activer le code, une boîte de dialogue apparaît pour vous permettre de sélectionner la colonne qui exclut l'en-tête contenant le texte délimité à diviser en lignes. Cliquez sur OK.

5. Ensuite, une deuxième boîte de dialogue apparaît pour entrer le délimiteur que vous utilisez. Ici, saisissez une virgule (,). Cliquez sur OK.

Maintenant, les textes délimités ont été divisés en lignes et les autres colonnes associées ont été répétées.

Le VBA modifiera les données d'origine, il est donc préférable d'en sauvegarder une copie avant.

L'utilisation de la fonctionnalité "Diviser les données en lignes" de Kutools pour Excel peut considérablement simplifier le processus de division d'un texte délimité en plusieurs lignes. En quelques clics seulement, vous pouvez diviser du texte séparé par des délimiteurs spécifiques, tels que des virgules, des points-virgules ou des espaces, en lignes individuelles.

Après avoir installé Kutools pour Excel, procédez comme suit :

1. Cliquez sur "Kutools" > "Fusionner et Diviser" > "Diviser les données en lignes", voir capture d'écran :

2. Dans la boîte de dialogue "Diviser les données en lignes", spécifiez les opérations suivantes :

1. Sélectionnez les données de la colonne que vous souhaitez diviser depuis la zone de texte "Plage (une seule colonne)" ;
2. Ensuite, choisissez le délimiteur qui sépare vos données, ici, je choisirai "Autre" et taperai une virgule et un espace (, ) dans la zone de texte ;
3. Enfin, cliquez sur le bouton OK.
   

Maintenant, les textes délimités ont été convertis en plusieurs lignes en fonction du séparateur spécifique, voir capture d'écran :

Si vous êtes sous Excel 2013 ou versions ultérieures, Power Query sera un bon choix pour résoudre cette tâche.

1. Sélectionnez la plage de données, puis cliquez sur "Données" > "À partir du tableau/plage".

2. Dans la boîte de dialogue "Créer un tableau" qui apparaît, cochez "Mon tableau a des en-têtes" si nécessaire, puis cliquez sur OK.

La fenêtre "Éditeur Power Query" s'affiche alors, et les données y sont visibles.

3. Cliquez sur la colonne où vous souhaitez diviser les textes délimités en lignes, puis cliquez sur l'onglet "Transformer" > "Diviser la colonne" > "Par délimiteur".

Vous pouvez également sélectionner la colonne et faire un clic droit sur l'en-tête de la colonne pour choisir cette fonctionnalité dans le menu contextuel.

4. Dans la fenêtre "Diviser la colonne par délimiteur", choisissez le délimiteur dont vous avez besoin dans la section "Sélectionner ou entrer un délimiteur", puis choisissez l'option "Chaque occurrence du délimiteur", puis développez la section "Options avancées" pour choisir l'option "Lignes". Cliquez sur OK.

Maintenant, les textes délimités ont été divisés en lignes.

5. Ensuite, fermez la fenêtre, une boîte de dialogue apparaît, cliquez sur le bouton Conserver.

Une nouvelle feuille sera alors créée avec le tableau.

En utilisant l'une de ces méthodes, vous pouvez diviser efficacement un texte délimité en lignes et rendre vos données Excel plus gérables et exploitables. Si vous êtes intéressé par l'exploration de plus d'astuces et conseils Excel, notre site web propose des milliers de tutoriels.