Comment supprimer des lignes avec des valeurs négatives dans Excel?

Supposons que vous ayez la plage de données suivante et que vous souhaitiez supprimer les lignes entières si le nombre est négatif dans la colonne B, existe-t-il de bonnes méthodes pour résoudre ce problème dans Excel?

Supprimer les lignes avec des nombres négatifs à l'aide du code VBA Supprimez les lignes avec des nombres négatifs à l'aide de Kutools for Excel

Supprimer les lignes avec des nombres négatifs à l'aide du code VBA

Le code VBA suivant peut vous aider à supprimer les lignes entières s'il y a des nombres négatifs dans une colonne spécifique, procédez comme suit:

1. Maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. Cliquez insérer > Moduleet collez le code suivant dans le Fenêtre du module.

Code VBA: supprimer les lignes avec des nombres négatifs

Sub Deleter()
'updatebyExtendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xTxt As String
    Dim I As Long
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
Sel:
    Set xRg = Nothing
    Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Areas.Count > 1 Then
        MsgBox "does not support multiple selections, please select again", vbInformation, "Kutools for Excel"
        GoTo Sel
    End If
    If xRg.Columns.Count > 1 Then
        MsgBox "does not support multiple columns, please select again", vbInformation, "Kutools for Excel"
        GoTo Sel
    End If
    For I = xRg.Rows.Count To 1 Step -1
        If xRg.Cells(I) < 0 Then xRg.Cells(I).EntireRow.Delete
    Next
End Sub

3. Et puis appuyez sur F5 clé pour exécuter ce code, dans la boîte de dialogue, veuillez sélectionner la colonne numérique à partir de laquelle vous souhaitez trouver les nombres négatifs, voir capture d'écran:

4. Puis clique OK bouton, les lignes avec des nombres négatifs ont été supprimées à la fois.

Supprimez les lignes avec des nombres négatifs à l'aide de Kutools for Excel

Pour gérer ce travail, Kutools for Excel's Sélectionnez des cellules spécifiques La fonctionnalité peut également vous rendre service, avec cet utilitaire, vous pouvez sélectionner d'abord les lignes entières contenant les valeurs négatives, puis supprimer les lignes entières selon vos besoins.

Après l'installation de Kutools for Excel, procédez comme suit:

1. Sélectionnez la colonne contenant les nombres négatifs que vous souhaitez supprimer.

2. Puis clique Kutools > Sélectionnez > Sélectionnez des cellules spécifiques, voir capture d'écran:

3. Dans le Sélectionnez des cellules spécifiques boîte de dialogue, sélectionnez Ligne entière option dans la Type de sélection, puis choisissez Moins que du Type spécifique et entrez 0 dans la zone de texte à côté des critères, voir capture d'écran:

4. Puis clique Ok, les lignes contenant des nombres négatifs ont été sélectionnées à la fois, puis cliquez sur Accueil > Supprimer > Supprimer les lignes de feuille pour supprimer les lignes sélectionnées selon vos besoins, voir les captures d'écran:

Astuces： Vous pouvez également faire un clic droit pour sélectionner Supprimer dans le menu contextuel pour supprimer les lignes sélectionnées.