Ինչպե՞ս ջնջել տողերը, եթե բջիջը Excel- ում որոշակի արժեքից մեծ է / պակաս:
Երբեմն կարող է անհրաժեշտ լինել ջնջել տողերը, եթե նշված սյունակի բջիջները Excel- ում որոշակի արժեքից մեծ կամ պակաս են: Այս հոդվածը խորհուրդ կտա մի քանի մեթոդներ `այս խնդրի լուծման համար:
Deleteնջեք տողերը, եթե բջիջը VBA կոդով որոշակի արժեքից մեծ է / պակաս
Deleteնջեք տողերը, եթե բջիջը Excel- ի համար Kutools- ի միջոցով որոշակի արժեքից մեծ է / պակաս
Deleteնջեք տողերը, եթե բջիջը Excel- ի համար որոշակի արժեքից մեծ է կամ պակաս, քան որոշակի արժեք
Deleteնջեք տողերը, եթե բջիջը VBA կոդով որոշակի արժեքից մեծ է / պակաս
Ենթադրելով, որ ցանկանում եք ջնջել ամբողջ տողերը, եթե D սյունակի բջիջը Excel- ում որոշակի արժեքից մեծ է կամ պակաս: Դրան հասնելու համար կարող եք գործարկել հետևյալ VBA կոդը:
1. Մամուլ ալտ + F11 ստեղները միաժամանակ բացելու համար Microsoft Visual Basic հավելվածների համար պատուհան.
2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > մոդուլ, Դրանից հետո պատճենեք և կպցրեք ստորև նշված VBA կոդը օրենսգրքի պատուհանում:
VBA կոդ. Deleteնջել տողերը, եթե բջիջը Excel- ում որոշակի արժեքից մեծ է / պակաս
Public Sub ProcessData()
Dim xRg As Range
Dim xTxt As String
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
If (xRg.Areas.Count > 1) Or (xRg.Columns.Count > 1) Then
MsgBox "You can only select one column per time", vbInformation, "Kutools for Excel"
Exit Sub
End If
xRg.Range("A1").EntireRow.Insert
Set xRg = xRg.Range("A1").Offset(-1).Resize(xRg.Rows.Count + 1)
xRg.Range("A1") = "Temp"
xRg.AutoFilter 1, ">30000"
Set xRg = Application.Intersect(xRg, xRg.SpecialCells(xlCellTypeVisible))
On Error GoTo 0
If Not xRg Is Nothing Then xRg.EntireRow.Delete
End Sub
ՆշումՎերոհիշյալ կոդում> 30000 նշանակում է, որ դուք կջնջեք տողերը, եթե նշված սյունակում բջիջները 30000-ից մեծ են: Եթե ցանկանում եք ջնջել տողերը, եթե բջիջները որոշակի արժեքից փոքր են, փոխեք նշանը> <և ապա նշեք ձեր արժեքը:
3. Մամուլ F5 Բանալին ՝ կոդն աշխատեցնելու համար, դուրս գալու պատուհանից Excel- ի համար նախատեսված գործիքներ երկխոսության տուփ, ընտրեք տիրույթը (մեկ սյուն), որը դուք կգտնեք, եթե այս սյունակի բջիջները որոշակի արժեքից ավելի մեծ կամ պակաս լինեն: Եվ այնուհետև կտտացրեք OK կոճակ Տեսեք,
Այնուհետև D սյունակում ավելի քան 30000 բջջային արժեք ունեցող բոլոր տողերն անմիջապես ջնջվում են:
Deleteնջեք տողերը, եթե բջիջը Excel- ի համար Kutools- ի միջոցով որոշակի արժեքից մեծ է / պակաս
The Ընտրեք հատուկ բջիջներ օգտակարությունը Excel- ի համար նախատեսված գործիքներ կարող է օգնել ձեզ ընտրել նշված շարքում որոշակի արժեքից մեծ կամ պակաս բջիջներով բոլոր շարքերը, ապա կարող եք միանգամից ձեռքով ջնջել բոլոր ընտրված շարքերը:
Նախքան դիմելը Excel- ի համար նախատեսված գործիքներ, խնդրում եմ նախ ներբեռնեք և տեղադրեք այն.
1. Ընտրեք այն սյունակը, որի հիման վրա ցանկանում եք ջնջել տողերը, ապա կտտացրեք Կուտոլս > ընտրել > Ընտրեք հատուկ բջիջներ, Տեսեք,
2. Մեջ Ընտրեք հատուկ բջիջներ երկխոսության տուփ, ընտրեք Ամբողջ շարքը է Ընտրության տեսակը Բաժին. Մեջ Հատուկ տեսակ բաժին ընտրեք Ավելի մեծ է or Պակաս առաջին բացվող ցուցակից, մուտքագրեք որոշակի արժեք հաջորդ տեքստային տուփի մեջ, ապա կտտացրեք OK կոճակը:
3. Դրանից հետո բացվում է երկխոսության տուփ ՝ ձեզ ասելու համար, թե քանի տող է ընտրված, սեղմեք այստեղ OK կոճակ Եվ դուք կարող եք տեսնել, որ D սյունակում 30000-ից ավելի արժեք ունեցող բոլոր տողերն անմիջապես ընտրվում են:
4. Աջ կտտացրեք ընտրված շարքերից մեկի վրա, ապա կտտացրեք ջնջել աջ կտտացնելու ցանկից: Եվ բոլոր ընտրված տողերը ջնջվում են:
Եթե ցանկանում եք ունենալ այս օգտակար ծառայության անվճար փորձարկում (30-օրյա), խնդրում ենք կտտացնել այն ներբեռնելու համար, և այնուհետև անցեք գործողությունը կիրառելու վերը նշված քայլերին համապատասխան:
Deleteնջեք տողերը, եթե բջիջը Excel- ի համար որոշակի արժեքից մեծ է կամ պակաս, քան որոշակի արժեք
Բացի վերը նշված երկու մեթոդներից, դուք կարող եք զտել նշված շարքում որոշակի արժեքից մեծ կամ պակաս բջիջներով բոլոր շարքերը և այնուհետև հեռացնել բոլոր զտված շարքերը Deleteնջել թաքնված (տեսանելի) շարքերը և սյունակը օգտակարությունը Excel- ի համար նախատեսված գործիքներ.
Նախքան դիմելը Excel- ի համար նախատեսված գործիքներ, խնդրում եմ նախ ներբեռնեք և տեղադրեք այն.
1. Ընտրեք սյունակի վերնագիրը, ապա կտտացրեք Ամսաթիվ > ֆիլտր, Տեսեք,
2. Կտտացրեք բացվող սլաքը սյունակում, որի հիման վրա կջնջեք տողերը, ապա կտտացրեք Թվերի զտիչներ > ավելի մեծ է, քան or Ավելի քիչ քան ինչպես ստորև նշված էկրանի նկարը.
3. Մեջ Անհատականացված AutoFilter երկխոսության տուփ, մուտքագրեք որոշակի համարը այն բանից հետո, երբ վանդակը ավելի մեծ է կամ պակաս, և ապա կտտացրու այն OK կոճակը:
4. Դրանից հետո բոլոր բջիջներով բոլոր տողերը, որոնք D սյունակում որոշակի արժեքից մեծ են կամ պակաս, բոլորը զտված են: Կարող եք ջնջել բոլոր զտված շարքերը ՝ ընտրելով զտված տվյալները և այնուհետև կտտացրեք Կուտոլս > ջնջել > Deleteնջել թաքնված (տեսանելի) շարքերը և սյունակները, Տեսեք,
5. Մեջ Deleteնջել թաքնված (տեսանելի) շարքերը և սյունակները երկխոսության տուփ, համոզվեք, որ Ընտրված տիրույթում տարբերակը ընտրված է Տես բացվող ցուցակ, ընտրեք Rows է Deleteնջել տեսակը բաժնում, նշեք «Տեսանելի շարքեր» տարբերակը Մանրամասն տեսակը բաժինը և վերջապես կտտացրեք այն OK կոճակը:
6. Այնուհետեւ ընտրված տիրույթի բոլոր տեսանելի շարքերը անմիջապես ջնջվում են, սեղմելով կտտացնելը, կարող եք չեղարկել զտիչը Ամսաթիվ > ֆիլտր.
Եթե ցանկանում եք ունենալ այս օգտակար ծառայության անվճար փորձարկում (30-օրյա), խնդրում ենք կտտացնել այն ներբեռնելու համար, և այնուհետև անցեք գործողությունը կիրառելու վերը նշված քայլերին համապատասխան:
Deleteնջեք տողերը, եթե բջիջը Excel- ի համար Kutools- ի միջոցով որոշակի արժեքից մեծ է / պակաս
Առնչվող հոդվածներ քանակը:
- Ինչպե՞ս ջնջել Excel- ում որոշակի շարքի կամ ակտիվ բջիջի տակ գտնվող բոլոր շարքերը:
- Ինչպե՞ս ջնջել բոլոր տողերը, բացառությամբ Excel- ի առաջին վերնագրի շարքի:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: