Hogyan lehet törölni a negatív értékű sorokat az Excelben?
Ha feltételezzük, hogy a következő adattartomány van, és törölni kívánja a teljes sorokat, ha a B oszlopban negatív a szám, van-e jó módszer a probléma megoldására az Excelben?
 |
 |
 |
Törölje a negatív számokkal rendelkező sorokat a VBA kód használatával Törölje a negatív számokat tartalmazó sorokat a Kutools for Excel segítségével |
Törölje a negatív számokkal rendelkező sorokat a VBA kód használatával
A következő VBA-kód segíthet a teljes sorok törlésében, ha negatív számok vannak egy adott oszlopban, kérjük, tegye a következőket:
1. Tartsa lenyomva a ALT + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.
2. Kattints betétlap > Modulok, és illessze be a következő kódot a Modul ablak.
VBA kód: Törölje a negatív számokkal rendelkező sorokat
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. Ezután nyomja meg a gombot F5 kulcs a kód végrehajtásához, a prompt mezőben válassza ki azt a számoszlopot, amelyből a negatív számokat megtalálja, lásd a képernyőképet:
4. Ezután kattintson OK gombra, a negatív számokkal rendelkező sorokat egyszerre törölték.
Törölje a negatív számokat tartalmazó sorokat a Kutools for Excel segítségével
A munka kezeléséhez Kutools az Excel számára'S Válassza a Specifikus cellák lehetőséget Ez a szolgáltatás egy szívességet is tehet Önnek, ezzel a segédprogrammal először kiválaszthatja a negatív értékeket tartalmazó teljes sorokat, majd szükség szerint törölheti az egész sorokat.
| Kutools az Excel számára : több mint 300 praktikus Excel-bővítménnyel, ingyenesen, korlátozás nélkül, 30 nap alatt kipróbálható. |
Telepítése után Kutools az Excel számára, kérjük, tegye a következőket:
1. Válassza ki azt az oszlopot, amely negatív számokat tartalmaz, amelyeket törölni szeretne.
2. Ezután kattintson Kutools > választ > Válassza a Specifikus cellák lehetőséget, lásd a képernyőképet:
3. Az Válassza a Specifikus cellák lehetőséget párbeszédpanelen válassza ki Teljes sor lehetőség a Kiválasztás típusa, majd válassza ki Kevesebb mint tól Konkrét típus és írja be 0 a kritériumok melletti szövegmezőbe, lásd a képernyőképet:
4. Ezután kattintson Ok, a negatív számokat tartalmazó sorokat egyszerre választotta ki, majd kattintson a gombra Kezdőlap > töröl > Munkasorok törlése a kijelölt sorok szükség szerinti törléséhez lásd a képernyőképeket:
 |
|
 |
tippekRight A jobb egérgombbal kattintással kiválaszthatja töröl a helyi menüből a kijelölt sorok törléséhez.
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
