Hvordan slettes rækker med negative værdier i Excel?
Antag, du har følgende datainterval, og du vil slette hele rækkerne, hvis tallet er negativt i kolonne B, er der nogen gode metoder til at løse dette problem i Excel?
Slet rækker med negative tal ved hjælp af VBA-kode
Følgende VBA-kode kan hjælpe dig med at slette hele rækkerne, hvis der er negative tal i en bestemt kolonne, skal du gøre som følger:
1. Hold nede ALT + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.
2. Klik indsatte > Moduler, og indsæt følgende kode i Modul vindue.
VBA-kode: Slet rækker med negative tal
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. Og tryk derefter på F5 nøgle til at udføre denne kode, i promptboksen skal du vælge den talekolonne, som du vil finde de negative tal fra, se skærmbillede:
4. Klik derefter på OK knappen, er rækkerne med negative tal slettet på én gang.
Slet rækker med negative tal ved hjælp af Kutools til Excel
For at håndtere dette job, Kutools til Excel's Vælg specifikke celler funktion kan også gøre dig en tjeneste, med dette værktøj kan du først vælge hele rækkerne, der indeholder de negative værdier, og derefter slette hele rækkerne efter behov.
Kutools til Excel : med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. |
Efter installation Kutools til Excelskal du gøre som følger:
1. Vælg kolonnen, der indeholder negative tal, som du vil slette.
2. Klik derefter på Kutools > Type > Vælg specifikke celler, se skærmbillede:
3. I Vælg specifikke celler dialogboksen, vælg Hele rækken valgmulighed i Valgtype, og vælg derefter Mindre end fra Specifik type og indtast 0 i tekstboksen ved siden af kriterierne, se skærmbillede:
4. Klik derefter på Ok, de rækker, der indeholder negative tal, er valgt på én gang, og klik derefter på Home > Slette > Slet arkrækker for at slette de valgte rækker efter behov, se skærmbilleder:
Tips: Du kan også højreklikke for at vælge Slette fra kontekstmenuen for at slette de valgte rækker.
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!