Comment supprimer des lignes ne contenant pas un certain texte dans Excel ?

Certains d'entre vous savent peut-être comment supprimer des lignes entières lorsqu'elles contiennent certains textes spécifiques dans Excel, mais si vous souhaitez supprimer une ligne lorsqu'elle ne contient pas ces textes spécifiques, comment procéder ? Suivez ce tutoriel pour découvrir une solution à ce problème dans Excel.

Supprimer des lignes ne contenant pas un certain texte avec le Filtre

Supprimer des lignes ne contenant pas un certain texte avec VBA

Supprimer des lignes ne contenant pas un certain texte avec Kutools pour Excel

Supprimer des lignes ne contenant pas un certain texte avec le Filtre

Dans Excel, la fonction Filtre peut rapidement vous aider à filtrer les lignes qui ne contiennent pas un certain texte, puis vous pouvez les sélectionner pour les supprimer.

1. Sélectionnez la colonne qui contient les textes sur lesquels vous souhaitez supprimer des lignes, puis cliquez sur Données > Filtre. Voir capture d'écran :

2. Dans l'en-tête de la colonne, il y a un bouton de filtre. Cliquez dessus pour ouvrir la liste déroulante, et cochez tout sauf le texte spécifique que vous souhaitez utiliser comme base. Voir capture d'écran :

3. Vous verrez alors uniquement la ligne d'en-tête et les lignes ne contenant pas le texte spécifique filtrées. Voir capture d'écran :

4. Sélectionnez-les toutes, sauf la ligne d'en-tête, faites un clic droit et choisissez Supprimer la ligne depuis le menu contextuel. Voir capture d'écran :

5. Ensuite, cliquez à nouveau sur Données > Filtre, et toutes les lignes ne contenant pas le texte spécifique seront supprimées. Voir capture d'écran :

Supprimer des lignes ne contenant pas un certain texte avec VBA

VBA est très utile pour effectuer des opérations quelque peu complexes dans Excel. Suivez les étapes ci-dessous pour supprimer les lignes ne contenant pas un certain texte.

1. Appuyez sur Alt + F11 pour afficher la fenêtre Microsoft Visual Basic pour Applications.

2. Dans la fenêtre, cliquez sur Insertion > Module pour ouvrir une nouvelle fenêtre de module, puis copiez le code VBA suivant dans la fenêtre du module.

VBA : Supprimer toute la ligne si la cellule ne contient pas un certain texte.

Sub DeleteRowNoInclude()
'Updateby Extendoffice
Dim xRow As Range
Dim rng As Range
Dim WorkRng As Range
Dim xStr As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xStr = Application.InputBox("Text", xTitleId, "", Type:=2)
Application.ScreenUpdating = False
For i = WorkRng.Rows.Count To 1 Step -1
    Set xRow = WorkRng.Rows(i)
    Set rng = xRow.Find(xStr, LookIn:=xlValues)
    If rng Is Nothing Then
       xRow.Delete
    End If
Next
Application.ScreenUpdating = True
End Sub

4. Cliquez ensuite sur OK, et tapez le texte sur lequel vous souhaitez supprimer des lignes dans une autre boîte de dialogue qui s'affiche. Voir capture d'écran :

5. Cliquez sur OK, et les lignes ne contenant pas Pomme seront supprimées.

Supprimer des lignes ne contenant pas un certain texte avec Kutools pour Excel

Si vous trouvez que les méthodes ci-dessus ne sont pas faciles à utiliser, vous pouvez utiliser la fonctionnalité Sélectionner des cellules spécifiques de Kutools pour Excel.

Kutools pour Excel inclut plus de 300 outils pratiques pour Excel. Essayez-le gratuitement sans limitation pendant 30 jours. Obtenez-le maintenant

1. Sélectionnez la colonne où vous souhaitez supprimer les lignes ne contenant pas le texte spécifique, puis cliquez sur Kutools > Outils de sélection > Sélectionner des cellules spécifiques. Voir capture d'écran :

2. Dans la boîte de dialogue Sélectionner des cellules spécifiques, cochez Ligne entière, sélectionnez Ne contient pas, et tapez le texte spécifique dans la zone de texte. Vous pouvez également cliquer sur le bouton Plage dans la section Spécifier le type pour sélectionner la cellule contenant le texte spécifique.

3. Cliquez ensuite sur OK, les lignes ne contenant pas le texte spécifique seront sélectionnées. Faites un clic droit et choisissez Supprimer depuis le menu contextuel. Voir capture d'écran :

4. Maintenant, toutes les lignes ne contenant pas le texte spécifique dans la plage sont supprimées. Cliquez ici pour plus d'informations sur Sélectionner des cellules spécifiques.

Articles connexes :

• Supprimer des lignes entières si la cellule ne contient pas zéro dans Excel
• Supprimer des lignes ne correspondant pas aux critères d'une autre feuille