Comment insérer des lignes vides lorsque la valeur change dans Excel ?

Supposons que vous ayez une plage de données, et maintenant vous souhaitez insérer des lignes vides entre les données lorsque la valeur change, afin de pouvoir séparer les valeurs identiques consécutives dans une colonne comme le montrent les captures d'écran suivantes. Dans cet article, je vais vous parler de quelques astuces pour résoudre ce problème.

Insérer des lignes vides lorsque la valeur change avec la fonction Sous-total

Insérer un nombre spécifique de lignes vides lorsque la valeur change avec une fonctionnalité puissante

Insérer des lignes vides lorsque la valeur change avec des colonnes auxiliaires

Insérer des lignes vides lorsque la valeur change avec du code VBA

Insérer des lignes vides lorsque la valeur change avec la fonction Sous-total

Avec la fonctionnalité Sous-total, vous pouvez insérer des lignes vides entre les données lorsque la valeur change en suivant les étapes suivantes :

1. Sélectionnez la plage de données que vous souhaitez utiliser.

2. Cliquez sur Données > Sous-total pour ouvrir la boîte de dialogue Sous-total, et dans la boîte de dialogue Sous-total, veuillez effectuer les options suivantes :

1 : Sélectionnez le nom de la colonne sur laquelle vous souhaitez insérer des lignes vides lorsque la valeur change dans la section À chaque changement ;

2 : Choisissez Compter dans la liste déroulante Utiliser la fonction ;

3 : Cochez le nom de la colonne dans laquelle vous souhaitez insérer le sous-total dans la zone de liste Ajouter un sous-total à.

3. Cliquez ensuite sur OK, les lignes de sous-total ont été insérées entre les différents produits, et les symboles de plan sont affichés à gauche du tableau, voir capture d'écran :

4. Ensuite, cliquez sur le chiffre 2 en haut des symboles de plan pour n'afficher que les lignes de sous-total.

5. Sélectionnez ensuite la plage de données des sous-totaux, et appuyez sur les touches Alt+; pour sélectionner uniquement les lignes visibles, voir capture d'écran :

6. Après avoir sélectionné uniquement les lignes visibles, appuyez sur la touche Supprimer du clavier, et toutes les lignes de sous-total ont été supprimées.

7. Ensuite, cliquez sur n'importe quelle autre cellule, puis allez dans Données > Dégrouper > Effacer le plan pour supprimer les plans, voir capture d'écran :

8. Les symboles de plan ont été effacés immédiatement, et vous pouvez voir que des lignes vides ont été insérées entre les données lorsque la valeur change, voir capture d'écran :

9. Enfin, vous pouvez supprimer la colonne A si nécessaire.

Insérer un nombre spécifique de lignes vides lorsque la valeur change avec une fonctionnalité puissante

Si vous êtes fatigué des méthodes fastidieuses ci-dessus, ici, je vais vous présenter un outil utile, Kutools for Excel, dont la fonction Marquer les modifications dans la colonne peut vous aider à insérer un saut de page, des lignes vides, une bordure inférieure ou une couleur de remplissage lorsque la valeur de la cellule change rapidement et facilement.

Après avoir installé Kutools for Excel, veuillez procéder comme suit :

1. Cliquez sur Kutools > Format > Marquer les modifications dans la colonne, voir capture d'écran :

2. Dans la boîte de dialogue Marquer les modifications dans la colonne , veuillez effectuer les opérations suivantes :

• Sélectionnez la plage de données que vous souhaitez utiliser, puis choisissez la colonne clé sur laquelle vous souhaitez insérer des lignes vides ;
• Ensuite, cochez l'option Ligne vide dans la section Options, et entrez le nombre de lignes vides que vous souhaitez insérer.

3. Cliquez ensuite sur le bouton Ok, et le nombre spécifique de lignes vides a été inséré dans les données lorsque la valeur de la cellule change, voir captures d'écran :

Cliquez pour télécharger Kutools for Excel et essayer gratuitement dès maintenant !

Insérer des lignes vides lorsque la valeur change avec des colonnes auxiliaires

Avec les colonnes auxiliaires, vous pouvez d'abord insérer une formule, puis appliquer la fonction Rechercher et Remplacer, et enfin insérer des lignes vides entre les valeurs changeantes. Veuillez procéder comme suit :

1. Dans une cellule vide C3, veuillez entrer cette formule =A3=A2, et dans la cellule D4, entrez cette formule =A4=A3, voir capture d'écran :

2. Sélectionnez ensuite C3:D4, et faites glisser la poignée de recopie sur la plage à laquelle vous souhaitez appliquer ces formules, et vous obtiendrez Vrai ou Faux dans les cellules, voir capture d'écran :

3. Appuyez ensuite sur Ctrl + F pour ouvrir la boîte de dialogue Rechercher et Remplacer, dans la fenêtre qui s'affiche, entrez FAUX dans la zone de texte Rechercher quoi sous l'onglet Rechercher, puis cliquez sur le bouton Options pour développer cette boîte de dialogue, et choisissez Valeurs dans la liste déroulante Rechercher dans, voir capture d'écran :

4. Cliquez sur le bouton Rechercher tout, puis appuyez sur Ctrl + A pour sélectionner tous les résultats de la recherche, toutes les cellules contenant FAUX ont été sélectionnées en une seule fois, voir capture d'écran :

6. Fermez la boîte de dialogue Rechercher et Remplacer, à l'étape suivante, vous pouvez insérer des lignes vides en cliquant sur Accueil > Insérer > Insérer des lignes de feuille, et des lignes vides ont été insérées dans les données lorsque la valeur change en fonction de la colonne A, voir captures d'écran :

7. Enfin, vous pouvez supprimer les colonnes auxiliaires C et D si nécessaire.

Insérer des lignes vides lorsque la valeur change avec du code VBA

Si vous êtes fatigué d'utiliser les méthodes ci-dessus, voici un code qui peut également vous aider à insérer des lignes vides entre les valeurs modifiées en une seule fois.

1. Maintenez les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez sur Insertion > Module, et collez le code suivant dans la fenêtre Module.

Code VBA : Insérer des lignes vides lorsque la valeur change

Sub InsertRowsAtValueChange()
'Update by Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = WorkRng.Rows.Count To 2 Step -1
    If WorkRng.Cells(i, 1).Value <> WorkRng.Cells(i - 1, 1).Value Then
        WorkRng.Cells(i, 1).EntireRow.Insert
    End If
Next
Application.ScreenUpdating = True
End Sub

3. Appuyez ensuite sur la touche F5 pour exécuter ce code, et une boîte de dialogue contextuelle apparaîtra pour vous permettre de sélectionner une colonne de données sur laquelle vous souhaitez insérer des lignes vides lorsque la valeur change, voir capture d'écran :

4. Cliquez ensuite sur OK, les lignes vides ont été insérées entre les données lorsque la valeur change en fonction de la colonne A.