Accéder au contenu principal

Comment insérer une ligne vide après un texte spécifique dans Excel ?

Author: Xiaoyang Last Modified: 2025-05-27

Dans Excel, insérer une ligne vide après un texte spécifique peut améliorer la lisibilité et organiser les données de manière plus efficace. Que vous travailliez avec une liste de tâches, des transactions ou des données structurées, ajouter des lignes vides après un texte spécifique peut séparer et regrouper les entrées connexes pour une meilleure clarté. Voici un guide complet pour y parvenir en utilisant plusieurs méthodes.

Screenshot of an Excel worksheet showing data before inserting blank rows after specific text Arrow Screenshot of an Excel worksheet showing data after inserting blank rows following specific text

Insérer des lignes vides après un texte spécifique avec du code VBA

Insérer des lignes vides après un texte spécifique avec Kutools AI


Insérer des lignes vides après un texte spécifique avec du code VBA

Vous pouvez appliquer le code VBA ci-dessous pour insérer des lignes vides après le texte spécifique dont vous avez besoin, procédez comme suit :

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

2. Cliquez sur "Insérer" > "Module", puis collez le code suivant dans la fenêtre Module.

Code VBA : Insérer des lignes vides après le texte spécifique

Sub Insertrowbelow()
'updateby Extendoffice
    Dim i As Long
    Dim xLast As Long
    Dim xRng As Range
    Dim xTxt As String
    On Error Resume Next
    xTxt = Application.ActiveWindow.RangeSelection.Address
    Set xRng = Application.InputBox("please select the column with specific text:", "Kutools for Excel", xTxt, , , , , 8)
    If xRng Is Nothing Then Exit Sub
    If (xRng.Columns.Count > 1) Then
        MsgBox "the selected range must be one column", , "Kutools for Excel"
        Exit Sub
    End If
    xLast = xRng.Rows.Count
    For i = xLast To 1 Step -1
      If InStr(1, xRng.Cells(i, 1).Value, "In progressing") > 0 Then
        Rows(xRng.Cells(i + 1, 1).Row).INSERT shift:=xlDown
      End If
    Next
End Sub

Remarque : Dans le code ci-dessus, vous pouvez remplacer le texte "In progressing" dans ce script "If InStr(1, xRng.Cells(i, 1).Value, "In progressing") > 0 Then".

3. Ensuite, appuyez sur la touche F5 pour exécuter ce code, dans la boîte de dialogue qui s'affiche, sélectionnez la colonne contenant le texte spécifique que vous souhaitez traiter, voir capture d'écran :

Screenshot of the Input Box in VBA for selecting the column with specific text to process

4. Ensuite, cliquez sur le bouton OK, et des lignes vides seront insérées après le texte spécifié, voir capture d'écran :

Screenshot of an Excel worksheet showing data before inserting blank rows after specific text Arrow Screenshot of an Excel worksheet showing data after inserting blank rows following specific text

Insérer des lignes vides après un texte spécifique avec Kutools AI

Avez-vous du mal à insérer des lignes vides après un texte spécifique dans Excel ? Laissez "Kutools AI" simplifier cette tâche pour vous ! Avec ses puissantes capacités d'IA, il n'est plus nécessaire de parcourir manuellement votre jeu de données ou d'écrire un code VBA complexe. Kutools AI identifiera instantanément les lignes contenant le texte spécifique et insérera des lignes vides là où vous en avez besoin.

Kutools pour Excel propose plus de 300 fonctionnalités avancées pour simplifier les tâches complexes, augmentant ainsi la créativité et l'efficacité. Intégré à des capacités d'IA, Kutools automatise les tâches avec précision, rendant la gestion des données facile et sans effort. Informations détaillées sur Kutools pour Excel...  Essai gratuit...

Après avoir installé Kutools Pour Excel, veuillez cliquer sur "Kutools" > "AI Aide" pour ouvrir le volet "Kutools AI Aide".

  1. Sélectionnez la colonne de données dans laquelle vous souhaitez insérer des lignes vides en fonction du texte spécifique ;
  2. Ensuite, saisissez la demande dans la zone de chat : par exemple :
    Insérer une ligne vide après le texte spécifique "In progressing" dans la sélection
  3. Puis, appuyez sur la touche Entrée ou cliquez sur le bouton "Envoyer". Kutools AI analysera la question, une fois terminé, cliquez sur le bouton "Exécuter" pour obtenir le résultat.

Insérer une ligne vide après un texte spécifique dans Excel peut être réalisé de plusieurs façons, selon la taille de votre jeu de données et votre niveau préféré d'automatisation. Si vous êtes intéressé par l'exploration d'autres astuces et conseils Excel, notre site Web propose des milliers de tutoriels.


Plus d'articles relatifs à l'insertion de lignes :

  • Copier et insérer une ligne plusieurs fois ou dupliquer la ligne X fois
  • Dans votre travail quotidien, avez-vous déjà essayé de copier une ligne ou chaque ligne, puis de l'insérer plusieurs fois sous la ligne de données actuelle dans une feuille de calcul ? Par exemple, j'ai une plage de cellules, maintenant, je veux copier chaque ligne et les coller 3 fois sur la ligne suivante comme le montre la capture d'écran ci-dessous. Comment pourriez-vous gérer cette tâche dans Excel ?
  • Insérer des lignes vides lorsque la valeur change dans Excel
  • Supposons que vous ayez une plage de données, et maintenant vous voulez insérer des lignes vides entre les données lorsque la valeur change, afin de pouvoir séparer les valeurs identiques séquentielles dans une colonne comme le montrent les captures d'écran ci-dessous. Dans cet article, je vais parler de quelques astuces pour vous aider à résoudre ce problème.
  • Insérer une ligne vide au-dessus d'un texte spécifique dans Excel
  • Lorsque vous travaillez sur une feuille de calcul, avez-vous déjà essayé d'insérer une ligne vide au-dessus d'un texte spécifique dans une colonne ? Par exemple, il y a des noms dans la colonne A, maintenant, je veux insérer des lignes vides au-dessus des cellules qui contiennent le nom “Mike” comme le montre la capture d'écran de gauche, peut-être qu'il n'y a pas de solution directe pour résoudre cette tâche dans Excel. Dans cet article, je vais parler de quelques bons trucs pour gérer cette tâche dans Excel.

Meilleurs outils de productivité pour Office

🤖 Kutools AI Aide : Révolutionner l'analyse des données basée sur : Exécution intelligente   |  Générer du code  |  Créer des formules personnalisées  |  Analyser les données et générer des graphiques  |  Invoquer les Fonctions améliorées
Fonctionnalités populaires : Trouver, mise en évidence ou marquer les doublons   |  Supprimer les lignes vides   |  Consolider les colonnes ou les cellules sans perdre de données   |   Arrondir sans formule ...
Super RECHERCHEV : RECHERCHEV avec critères multiples    RECHERCHEV avec valeurs multiples  |   Recherche multi-feuilles   |   Correspondance floue ....
Liste déroulante avancée : Créer rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante multi-sélection ....
Gestionnaire de colonnes : Ajouter un nombre spécifique de colonnes  |  Déplacer les colonnes  |  Basculer l'état de visibilité des colonnes masquées  |  Comparer les plages & colonnes ...
Fonctionnalités en vedette : Mise au point de la grille   |  Affichage de conception   |   Barre de formule améliorée    Gestionnaire de classeur & feuille de calcul   |  Bibliothèque dAutoTexte (Auto Text)   |  Sélecteur de date   |  Fusionner les données   |  Crypter/Déchiffrer les cellules    Envoyer un e-mail par liste   |  Super Filtre   |   Filtre spécial (filtrer les cellules avec une police en gras/italique/barré...) ...
Top15 ensembles d'outils12 outils de texte (Ajouter du texte, Supprimer des caractères spécifiques, ...)   |   50+ types de graphiques (Diagramme de Gantt, ...)   |   40+ formules pratiques (Calculer lâge en fonction de la date de naissance, ...)   |   19 outils d'insertion (Insérer un code QR, Insérer une image depuis le chemin, ...)   |  12 outils de conversion (Convertir en mots, Conversion de devises, ...)   |  7 outils de fusion & division (Fusion avancée des lignes, Diviser les cellules, ...)   |   ... et plus

Boostez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité sans précédent. Kutools pour Excel propose plus de300 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

  • Activez la modification 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é de50 %, et réduit des centaines de clics de souris pour vous chaque jour !