Ինչպե՞ս զտել ցուցակը և ջնջել Excel- ում մնացած թաքնված կամ տեսանելի շարքերը:

Filտված ցուցակի համար գուցե անհրաժեշտ լինի ջնջել թաքնված կամ տեսանելի շարքերը, որպեսզի պահպանեք միայն օգտակար տվյալները: Այս հոդվածում մենք ձեզ ցույց կտանք Excel- ում զտված ցուցակի մնացած թաքնված կամ տեսանելի տողերը ջնջելու մեթոդներ:

BAնջեք թաքնված տողերը ակտիվ աշխատանքային թերթում VBA կոդով
Deleteնջեք զտված ցուցակի տեսանելի շարքերը `ընտրելով բոլոր տեսանելի բջիջները
Excel- ի համար Kutools- ի միջոցով հեշտությամբ ջնջեք ֆիլտրացված ցուցակի թաքնված կամ տեսանելի շարքերը

BAնջեք թաքնված տողերը ակտիվ աշխատանքային թերթում VBA կոդով

Այս բաժինը ցույց կտա ձեզ VBA կոդ ՝ ակտիվ թերթում թաքնված տողերը ջնջելու համար: Խնդրում եմ արեք հետևյալ կերպ.

1. Ակտիվացրեք աշխատաթերթը, որն անհրաժեշտ է թաքնված տողերը ջնջելու համար, սեղմեք ալտ + F11 ստեղները միաժամանակ բացելու համար Microsoft Visual Basic հավելվածների համար պատուհան.

2. Microsoft Visual Basic հավելվածների համար պատուհանում կտտացրեք Տեղադրել > Մոդուլներ, Եվ ապա պատճենեք և կպցրեք ստորև նշված VBA կոդը Մոդուլի պատուհանում:

VBA կոդ. Deleteնջել թաքնված շարքերը

Sub RemoveHiddenRows()
	Dim xRow As Range
	Dim xRg As Range
	Dim xRows As Range
	On Error Resume Next
	Set xRows = Intersect(ActiveSheet.Range("A:A").EntireRow, ActiveSheet.UsedRange)
	If xRows Is Nothing Then Exit Sub
		For Each xRow In xRows.Columns(1).Cells
			If xRow.EntireRow.Hidden Then
				If xRg Is Nothing Then
					Set xRg = xRow
				Else
					Set xRg = Union(xRg, xRow)
				End If
			End If
		Next
		If Not xRg Is Nothing Then
			MsgBox xRg.Count & " hidden rows have been deleted", , "Kutools for Excel"
			xRg.EntireRow.Delete
		Else
			MsgBox "No hidden rows found", , "Kutools for Excel"
		End If
	End Sub

3. Սեղմեք F5 ծածկագիրը գործելու համար: Եթե ​​ակտիվ թերթում կան թաքնված տողեր, ծածկագիրը գործարկելուց հետո կհայտնվի երկխոսության տուփ, որը կպատմի, թե քանի թաքնված տող է ջնջվել: Սեղմիր OK կոճակը թաքնված տողերը ջնջելու համար: Տեսեք,

Հակառակ դեպքում, կոդը գործարկելուց հետո դուք կստանաք հետևյալ երկխոսության տուփը:

Նշումվերոհիշյալ VBA կոդը ոչ միայն կարող է ջնջել զտված ցուցակի թաքնված տողերը, այլև ջնջել թաքնված շարքերը, որոնք նախկինում ձեռքով թաքցրել եք:

Deleteնջեք զտված ցուցակի տեսանելի շարքերը `ընտրելով բոլոր տեսանելի բջիջների առանձնահատկությունը

Filտված ցուցակի տեսանելի տողերը ջնջելու համար կատարեք հետևյալը.

1. Ընտրեք բոլոր զտված շարքերը և սեղմեք F5 բանալին բացելու համար Գնալ երկխոսության տուփ, ապա կտտացրեք հատուկ կոճակ Տեսեք,

2. Մեջ Գնալ հատուկ երկխոսության տուփ, ստուգեք Միայն տեսանելի բջիջներ տարբերակը, ապա կտտացրեք OK կոճակը:

3. Այժմ ընտրված են բոլոր տեսանելի տողերը, աջով կտտացրեք ընտրությանը և այնուհետև կտտացրեք Ջնջել տողերը.

Մինչ այժմ բոլոր տեսանելի շարքերը ջնջվում են զտված ցուցակից:

Excel- ի համար Kutools- ի միջոցով հեշտությամբ ջնջեք ֆիլտրացված ցուցակի թաքնված կամ տեսանելի շարքերը

Վերոնշյալ երկու մեթոդները կարող են լինել Excel- ի շատ օգտվողների ցանկության լուծումներ, այստեղ մենք ձեզ ներկայացնում ենք հարմար գործիք: Հետ Deleteնջել թաքնված (տեսանելի) շարքերը և սյունակները օգտակարությունը Excel- ի համար նախատեսված գործիքներ, Դուք կարող եք հեշտությամբ ջնջել թաքնված տողերը ընտրված տիրույթում / թերթերում, ակտիվ թերթում կամ Excel- ի բոլոր աշխատանքային թերթերում:

1. Եթե ցանկանում եք ջնջել միայն զտված ցուցակի թաքնված կամ տեսանելի շարքերը, խնդրում ենք ձեռքով ընտրեք զտված շարքը և այնուհետև կտտացրեք Կուտոլս > ջնջել > Deleteնջել թաքնված (տեսանելի) շարքերը և սյունակները, Տեսեք,

2. Մեջ Deleteնջել թաքնված (տեսանելի) շարքերը և սյունակը երկխոսության տուփ, պահեք այն Ընտրված տիրույթում ընտրված է Տես բացվող ցուցակ (ըստ անհրաժեշտության կարող եք ընտրել այլ տարբերակներ), ստուգեք Rows տարբերակը Deleteնջել տեսակը բաժնում, իսկ Մանրամասն տեսակը հատված, ստուգել Տեսանելի շարքեր or Թաքնված շարքեր տարբերակ, որքան անհրաժեշտ է: Եվ վերջապես կտտացրեք այն OK կոճակը:

3. Դրանից հետո բացվում է երկխոսության տուփ ՝ ձեզ ասելու համար, թե քանի տող է ջնջվել, սեղմեք այստեղ OK կոճակը:

Utնջեք ֆիլտրացված ցուցակի թաքնված կամ տեսանելի շարքերը Kutools- ի միջոցով Excel- ի համար

Գրասենյակի արտադրողականության լավագույն գործիքները

🤖	Kutools AI օգնականՀեղափոխություն կատարել տվյալների վերլուծության հիման վրա՝ Խելացի կատարում   |  Ստեղծեք ծածկագիր  |  Ստեղծեք հատուկ բանաձևեր  |  Վերլուծել տվյալները և ստեղծել գծապատկերներ  |  Invoke Kutools-ի գործառույթները...
	Հանրաճանաչ հատկություններ: Գտեք, ընդգծեք կամ նույնականացրեք կրկնօրինակները   |  Deleteնջել դատարկ շարքերը   |  Միավորել սյունակները կամ բջիջները՝ առանց տվյալների կորստի   |   Կլոր առանց բանաձևի ...
	Super Փնտրել: Բազմաթիվ չափանիշների VLookup  |   Բազմակի արժեք VLookup  |   VLookup բազմաթիվ թերթերում   |   Fuzzy Փնտրել ....
	Ընդլայնված բացվող ցուցակ: Արագ ստեղծեք բացվող ցուցակը   |  Կախված բացվող ցուցակ   |  Բազմակի ընտրություն Drop Down ցուցակ ....
	Սյունակի կառավարիչ: Ավելացրեք որոշակի քանակությամբ սյունակներ  |  Տեղափոխել սյունակները  |  Փոխարկել թաքնված սյունակների տեսանելիության կարգավիճակը  |  Համեմատեք միջակայքերը և սյունակները ...
	Առանձնահատկություններ: Ցանցի կենտրոնացում   |  Դիզայնի տեսք   |   Մեծ Formula Bar   |  Աշխատանքային գրքույկի և թերթիկների կառավարիչ   |  Ռեսուրսների գրադարան (Ավտոմատ տեքստ)   |  Ամսաթիվ ընտրող   |  Միավորել աշխատանքային թերթերը   |  Գաղտնագրել/գաղտնազերծել բջիջները   |  Ուղարկեք նամակներ ըստ ցանկի   |  Սուպեր զտիչ   |   Հատուկ զտիչ (զտել թավ/շեղ/շեղված...) ...
	Լավագույն 15 գործիքների հավաքածու:  12 Տեքստ Գործիքներ (Ավելացրեք տեքստ, Հեռացնել նիշերը, ...)   |   50+ Աղյուսակ Տեսակներ (Գանտի աղյուսակը, ...)   |   40+ Գործնական Բանաձեւեր (Հաշվարկել տարիքը ՝ ելնելով ծննդյան տարեդարձից, ...)   |   19 միացում Գործիքներ (Տեղադրեք QR կոդ, Տեղադրեք նկար ուղուց, ...)   |   12 Փոխարկում Գործիքներ (Բառեր համարներ, Արտարժույթի փոխակերպումը, ...)   |   7 Միաձուլում և պառակտում Գործիքներ (Ընդլայնված կոմբինատ տողեր, Պառակտված բջիջներ, ...)   |   ... եւ ավելին

Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար:  Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...

Կարդալ ավելին... Անվճար ներբեռնում...

---

Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

• Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
• Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
• Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:

Կարդալ ավելին... Անվճար ներբեռնում...