Այս ձեռնարկը ձեզ կսովորեցնի մի քանի պարզ հնարքներ Excel-ում մի քանի դատարկ տողեր անվտանգ ջնջելու համար՝ առանց որևէ տեղեկություն կորցնելու :

Excel-ի դատարկ տողերը խնդիր է, որը մենք բոլորս բախվում ենք: մեկ-մեկ, հատկապես տարբեր աղբյուրներից տվյալներ համադրելիս կամ այլ տեղից տեղեկատվություն ներմուծելիս: Դատարկ տողերը կարող են մեծ վնաս հասցնել ձեր աշխատաթերթերին տարբեր մակարդակներում, և դրանք ձեռքով ջնջելը կարող է լինել ժամանակատար և սխալների հակված գործընթաց: Այս հոդվածում դուք կսովորեք մի քանի պարզ և հուսալի մեթոդներ՝ ձեր աշխատաթերթերում դատարկ տեղերը հեռացնելու համար:

Ինչպես ՉՀեռացնել դատարկ տողերը Excel-ում

Կան մի քանիսը Excel-ում դատարկ տողերը ջնջելու տարբեր եղանակներ, բայց զարմանալիորեն շատ առցանց ռեսուրսներ կպչում են ամենավտանգավորին, այն է՝ Գտնել & amp; Ընտրեք > Անցնել Հատուկ > Դատարկ :

Ի՞նչ սխալ է այս տեխնիկան: Այն ընտրում է բոլոր դատարկերը մի տիրույթում, և, հետևաբար, դուք կջնջեք բոլոր տողերը, որոնք պարունակում են նույնքան դատարկ բջիջ:

Ստորև նկարը ցույց է տալիս ձախ կողմում գտնվող բնօրինակ աղյուսակը և ստացված աղյուսակը աջ կողմում: Եվ արդյունքում ստացված աղյուսակում բոլոր անավարտ տողերը վերացել են, նույնիսկ 10-րդ տողը, որտեղ բացակայում էր միայն D սյունակի ամսաթիվը.

Վերջին տող. տողեր՝ ընտրելով դատարկ բջիջներ: Փոխարենը, օգտագործեք քննարկված առավել կշռադատված մոտեցումներից մեկըամեն ինչ ավելի բարդ դարձնել, քան պետք է: Այսպիսով, մենք մի քայլ առաջ արեցինք և երկու սեղմումով երթուղի ստեղծեցինք Excel-ում դատարկ տողերը ջնջելու համար:

Ձեր ժապավենին ավելացված Ultimate Suite-ի հետ միասին, ահա թե ինչպես կարող եք ջնջել բոլոր դատարկ տողերը աշխատանքային թերթում՝

1. Ablebits Tools ներդիրում, Փոխակերպում խմբում սեղմեք Ջնջել դատարկները > Դատարկ տողեր .
2. Հավելվածը կտեղեկացնի ձեզ, որ բոլոր դատարկ տողերը կհեռացվեն ակտիվ աշխատաթերթից և կխնդրեն հաստատել: Սեղմեք OK, և մի պահ բոլոր դատարկ տողերը կվերացվեն:

Ինչպես ցույց է տրված ստորև ներկայացված սքրինշոթում, մենք միայն հանել ենք բացարձակապես դատարկ տողերը , որոնք չունեն տվյալների հետ մեկ բջիջ.

Գտնելու համար Excel-ի համար նախատեսված մեր Ultimate Suite-ում ներառված ավելի հիանալի հնարավորություններ, դուք կարող եք ներբեռնել փորձնական տարբերակը:

Շնորհակալ եմ կարդալու համար և հուսով եմ, որ հաջորդ շաբաթ կտեսնենք ձեզ մեր բլոգում:

ստորև:

Ինչպես հեռացնել դատարկ տողերը Excel-ում VBA-ով

Excel VBA-ն կարող է շտկել շատ բաներ, ներառյալ բազմաթիվ դատարկ տողեր: Այս մոտեցման ամենալավ բանն այն է, որ այն չի պահանջում որևէ ծրագրավորման հմտություններ: Պարզապես վերցրեք ստորև բերված կոդերից մեկը և գործարկեք այն ձեր Excel-ում (հրահանգներն այստեղ են):

Մակրո 1. Ջնջեք դատարկ տողերը ընտրված տիրույթում

Այս VBA կոդը լուռ ջնջում է բոլոր դատարկերը: տողեր ընտրված տիրույթում, առանց օգտվողին որևէ հաղորդագրություն կամ երկխոսության տուփ ցուցադրելու:

Ի տարբերություն նախորդ տեխնիկայի, մակրոն ջնջում է տողը, եթե ամբողջ տողը դատարկ է : Այն հիմնվում է CountA աշխատաթերթի ֆունկցիայի վրա՝ ստանալու համար ոչ դատարկ բջիջների թիվը յուրաքանչյուր տողում, և այնուհետև ջնջում է զրոյական թվով տողերը:

Public Sub DeleteBlankRows() Dim SourceRange As Range Dim EntireRow As Range Set SourceRange = Application: Ընտրությունը, եթե ոչ (SourceRange-ը ոչինչ է) Ապա Application.ScreenUpdating = False For I = SourceRange.Rows.Count to 1 Step -1 Set EntireRow = SourceRange.Cells(I, 1).EntireRow If Application.WorksheetFunction.CountAw) 0 Այնուհետեւ EntireRow.Delete End If Next Application.ScreenUpdating = True End If End Sub

Որպեսզի օգտվողին հնարավորություն ընձեռվի ընտրել թիրախային տիրույթը մակրո գործարկելուց հետո , օգտագործեք այս կոդը՝

Public Sub RemoveBlankLines() Dim SourceRange As Range Dim EntireRow as Range On Error Resume Next Set SourceRange = Application.InputBox( _"Ընտրեք միջակայք․ 1 Սահմանել EntireRow = SourceRange.Cells(I, 1).EntireRow If Application.WorksheetFunction.CountA(EntireRow) = 0 Ապա EntireRow.Delete End If Next Application.ScreenUpdating = True End If End Sub

գործարկումից հետո ցուցադրվում է մակրո Հետևյալ մուտքագրման դաշտում ընտրում եք թիրախային տիրույթը և սեղմում OK.

Մի պահից ընտրված տիրույթի բոլոր դատարկ տողերը կվերացվեն, իսկ մնացածները կտեղափոխվեն վեր՝

Մակրո 2. Ջնջել բոլոր դատարկ տողերը Excel-ում

ակտիվ թերթի բոլոր դատարկ տողերը հեռացնելու համար, որոշեք օգտագործված տիրույթի վերջին տողը (այսինքն՝ տողը, որը պարունակում է վերջին բջիջը տվյալների հետ), և այնուհետև գնացեք դեպի վեր՝ ջնջելով այն տողերը, որոնց համար CountA-ը վերադարձնում է զրո:

Sub DeleteAllEmptyRows() Dim LastRowIndex-ը որպես ամբողջ թիվ Dim RowIndex-ը որպես ամբողջ թվի Dim UsedRng Որպես Range Set UsedRng = Activ eSheet.UsedRange LastRowIndex = UsedRng.Row - 1 + UsedRng.Rows.Count Application.ScreenUpdating = False For RowIndex = LastRowIndex To 1 Step -1 If Application.CountA(Rows(RowIndex)) = 0 RowIndex). Եթե ​​Next RowIndex Application.ScreenUpdating = True End Sub

Macro 3. Ջնջել տողը, եթե բջիջը դատարկ է

Այս մակրոյով դուք կարող եք ջնջել մի ամբողջ տող, եթե նշված բջիջը նշված է:սյունակը դատարկ է:

Հետևյալ կոդը ստուգում է A սյունակում դատարկ տեղերը: Մեկ այլ սյունակի վրա հիմնված տողերը ջնջելու համար «A» փոխարինեք համապատասխան տառով:

Sub DeleteRowIfCellBlank() Սխալի դեպքում Resume Next Columns( "A" ).SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub

Որպես Փաստորեն, մակրոն օգտագործում է Գնալ դեպի Հատուկ > Բլանկեր հատկությունը, և դուք կարող եք նույն արդյունքին հասնել՝ կատարելով այս քայլերը ձեռքով:

Նշում. Մակրոն ջնջում է դատարկ տողերը ամբողջ թերթում , ուստի խնդրում ենք շատ զգույշ լինել այն օգտագործելիս: Որպես նախազգուշական միջոց, կարող է խելամիտ լինել կրկնօրինակել աշխատաթերթը նախքան այս մակրո գործարկելը:

Ինչպես հեռացնել դատարկ տողերը Excel-ում VBA-ով

Excel-ում դատարկ տողերը մակրո օգտագործելով ջնջելու համար, դուք կարող է կամ տեղադրել VBA կոդը ձեր սեփական աշխատանքային գրքում կամ գործարկել մակրո մեր նմուշի աշխատանքային գրքույկից:

Ավելացրեք մակրո ձեր աշխատանքային գրքում

Մակրո ձեր աշխատանքային գրքում տեղադրելու համար կատարեք հետևյալ քայլերը. 3>

1. Բացեք աշխատաթերթը, որտեղ ցանկանում եք ջնջել դատարկ տողերը:
2. Սեղմեք Alt + F11՝ Visual Basic Editor-ը բացելու համար:
3. Ձախ վահանակում աջ սեղմեք This Workbook , ապա սեղմեք Տեղադրել > Module :
4. Տեղադրեք կոդը կոդի պատուհանում:
5. Սեղմեք F5: մակրո գործարկելու համար:

Մանրամասն քայլ առ քայլ հրահանգների համար տե՛ս Ինչպես տեղադրել և օգտագործել VBA Excel-ում:

Գործարկել մակրո մեր նմուշի աշխատանքային գրքույկից

Ներբեռնեք մեր նմուշըաշխատանքային գրքույկ մակրոներով՝ դատարկ տողերը ջնջելու համար և այնտեղից գործարկելու հետևյալ մակրոներից մեկը.

DeleteBlankRows - հեռացնում է դատարկ տողերը ներկայումս ընտրված տիրույթում:

RemoveBlankLines - ջնջում է դատարկ տողերը և տեղաշարժվում այն ​​տիրույթում, որը դուք ընտրում եք մակրո գործարկելուց հետո:

DeleteAllEmptyRows - ջնջում է ակտիվ թերթի բոլոր դատարկ տողերը:

DeleteRowIfCellBlank - ջնջում է տողը, եթե որոշակի սյունակի բջիջը դատարկ է:

Մակրոն ձեր Excel-ում գործարկելու համար կատարեք հետևյալը.

1. Բացեք ներբեռնված աշխատանքային գրքույկը և միացրեք մակրոները, եթե պահանջվի:
2. Բացեք ձեր սեփական աշխատանքային գիրքը և նավարկեք դեպի հետաքրքրող աշխատաթերթը:
3. Ձեր աշխատաթերթում սեղմեք Alt + F8, ընտրեք մակրո և սեղմեք Գործարկել ։

Excel-ում դատարկ տողերը ջնջելու բանաձևը

Եթե ցանկանում եք տեսնել, թե ինչ եք ջնջում, օգտագործեք հետևյալ բանաձևը՝ դատարկ տողերը բացահայտելու համար.

=IF(COUNTA(A2:D2)=0, "Blank", "Not blank")

Որտեղ A2-ը առաջինն է, իսկ D2-ը վերջին օգտագործված բջիջն է առաջին տվյալների տողում:

Մուտքագրեք այս բանաձևը a E2-ում կամ 2-րդ շարքի որևէ այլ դատարկ սյունակում և քաշեք լրացման բռնիչը՝ բանաձևը ներքև պատճենելու համար:

Արդյունքում դուք կունենաք «Դատարկ» դատարկ տողերում և «Ոչ դատարկ» տողերում: որոնք պարունակում են տվյալներ ունեցող առնվազն մեկ բջիջ․ .

ՄիջՓաստորեն, դուք կարող եք լավ անել առանց IF:

=COUNTA(A2:D2)=0

Այս դեպքում բանաձևը կվերադարձնի TRUE դատարկ տողերի համար և FALSE ոչ դատարկ տողերի համար:

առկա բանաձևը, կատարեք հետևյալ քայլերը՝ դատարկ տողերը ջնջելու համար.

1. Ընտրեք վերնագրի տողում գտնվող ցանկացած բջիջ և սեղմեք Տեսակավորել & Զտել > Զտիչ Տուն ներդիրում, Ձևաչափեր Սա կավելացնի զտման բացվող սլաքները վերնագրի բոլոր բջիջներում:
2. Սեղմեք բանաձևի սյունակի վերնագրի սլաքը, հանեք (Ընտրել բոլորը), ընտրեք Դատարկ և սեղմեք OK :
3. Ընտրեք բոլոր զտված տողերը: . Դրա համար կտտացրեք առաջին զտված տողի առաջին բջիջը և սեղմեք Ctrl + Shift + End՝ ընտրությունը մինչև վերջին զտված տողի վերջին բջիջը երկարացնելու համար:
4. Աջ սեղմեք ընտրվածի վրա, ընտրեք Համատեքստի ընտրացանկից ջնջեք տողը, այնուհետև հաստատեք, որ իսկապես ցանկանում եք ջնջել ամբողջ տողերը.
5. Հեռացրեք զտիչը՝ սեղմելով Ctrl + Shift + L Կամ սեղմեք Գլխավոր ներդիրը > Տեսակավորել & Զտել > Զտել :
6. Ջնջել սյունակը բանաձևով, քանի որ այն այլևս ձեզ պետք չէ:

Ահա և վերջ: Արդյունքում մենք ունենք մաքուր աղյուսակ՝ առանց դատարկ տողերի, բայց պահպանված է ողջ տեղեկատվությունը.

Հուշում։ Դատարկ տողերը ջնջելու փոխարեն կարող եք պատճենել ոչ դատարկ տողերը այլ տեղ: Դա անելու համար զտեք «Ոչ դատարկ» տողերը, ընտրեք դրանք և սեղմեք Ctrl + C՝ պատճենելու համար: Այնուհետև անցեքմեկ այլ թերթ, ընտրեք նպատակակետի տիրույթի վերին ձախ բջիջը և սեղմեք Ctrl + V՝ տեղադրելու համար:

Ինչպես հեռացնել դատարկ տողերը Excel-ում Power Query-ով

Excel 2016 և Excel 2019, Կա դատարկ տողերը ջնջելու ևս մեկ եղանակ՝ օգտագործելով Power Query ֆունկցիան: Excel 2010-ում և Excel 2013-ում այն ​​կարելի է ներբեռնել որպես հավելում:

Կարևոր նշում: Այս մեթոդը գործում է հետևյալ նախազգուշացման դեպքում. Power Query-ը աղբյուրի տվյալները վերածում է Excel աղյուսակի և փոխում է ձևաչափումը, ինչպիսիք են լրացման գույնը, եզրագծերը և որոշ թվերի ձևաչափեր: Եթե ​​ձեր սկզբնական տվյալների ֆորմատավորումը ձեզ համար կարևոր է, ապա ավելի լավ է ընտրեք որևէ այլ միջոց Excel-ում դատարկ տողերը հեռացնելու համար:

1. Ընտրեք այն տիրույթը, որտեղ ցանկանում եք ջնջել դատարկ տողերը:
2. Գնացեք Տվյալներ ներդիր > Ստացեք & Փոխակերպեք խումբը և սեղմեք Սեղանից/Տեսակայքից : Սա ձեր աղյուսակը կբեռնի Power Query Editor-ում:
3. Power Query Editor-ի Տուն ներդիրում սեղմեք Հեռացնել տողերը > Հեռացնել դատարկ տողերը :
4. Սեղմեք Փակել & Load Սա կբեռնի ստացված աղյուսակը նոր աշխատաթերթում և կփակի Հարցումների խմբագրիչը:

Այս մանիպուլյացիաների արդյունքում ես ստացա հետևյալ աղյուսակը առանց դատարկ գծերի, բայց մի քանի տհաճ փոփոխություններով. արժույթի ձևաչափը կորչում է, և ամսաթվերը ցուցադրվում են լռելյայն ձևաչափով: սովորականի փոխարեն՝

Ինչպես ջնջել տողերը, եթեորոշակի սյունակի բջիջը դատարկ է

Այս ձեռնարկի սկզբում մենք նախազգուշացրել ենք ձեզ չջնջել դատարկ տողերը՝ ընտրելով դատարկ: Այնուամենայնիվ, այս մեթոդը հարմար է, եթե ցանկանում եք ջնջել տողերը՝ հիմնված դատարկների վրա կոնկրետ սյունակում :

Որպես օրինակ, եկեք հեռացնենք բոլոր այն տողերը, որտեղ A սյունակի բջիջը դատարկ է: :

1. Ընտրեք հիմնական սյունակը, մեր դեպքում A սյունակը:
2. Տուն ներդիրում սեղմեք Գտնել & Ընտրեք > Գնալ Հատուկ : Կամ սեղմեք F5 և սեղմեք Հատուկ… կոճակը:
3. Գնալ Հատուկ երկխոսության մեջ ընտրեք Դատարկ և սեղմեք Լավ : Սա կընտրի A սյունակի օգտագործված տիրույթի դատարկ բջիջները:
4. Աջ սեղմեք ցանկացած ընտրված բջիջի վրա և ընտրեք Ջնջել… համատեքստի ընտրացանկից:
5. Ջնջել երկխոսության վանդակում ընտրեք Ամբողջ տողը և սեղմեք OK:

Կատարված է: Այն տողերը, որոնք արժեք չունեն A սյունակում, այլևս չկան.

Նույն արդյունքին կարելի է հասնել առանցքային սյունակի բացերը զտելով:

Ինչպես հեռացնել տվյալների տակ գտնվող լրացուցիչ տողերը

Երբեմն բոլորովին դատարկ տեսք ունեցող տողերը իրականում կարող են պարունակել որոշ ձևաչափեր կամ չտպվող նիշեր: Ստուգելու համար, թե արդյոք տվյալների հետ վերջին բջիջը իսկապես ձեր աշխատաթերթի վերջին օգտագործված բջիջն է, սեղմեք Ctrl + End: Եթե ​​սա ձեզ տեղափոխել է ձեր տվյալների տակ գտնվող տեսողական դատարկ տող, Excel-ի առումով, այդ տողը դատարկ չէ: Նման տողերը հեռացնելու համար կատարեքհետևյալը՝

1. Սեղմեք ձեր տվյալների տակ գտնվող առաջին դատարկ տողի վերնագրի վրա՝ այն ընտրելու համար:
2. Սեղմեք Ctrl + Shift + End : Սա կընտրի բոլոր տողերը, որոնք պարունակում են որևէ բան, ներառյալ ձևաչափերը, բացատները և չտպող նիշերը:
3. Աջ սեղմեք ընտրվածի վրա և ընտրեք Ջնջել… > Ամբողջ տողը:

Եթե դուք ունեք համեմատաբար փոքր տվյալների հավաքածու, կարող եք ազատվել ձեր տվյալների տակ գտնվող բոլոր դատարկ տողերից, օրինակ. ոլորումը հեշտացնելու համար: Թեև Excel-ում չօգտագործված տողերը ջնջելու միջոց չկա, ոչինչ չի խանգարի ձեզ թաքցնել դրանք: Ահա թե ինչպես.

1. Ընտրեք վերջին տողի տակ գտնվող տողը տվյալների հետ՝ սեղմելով դրա վերնագիրը:
2. Սեղմեք Ctrl + Shift + ներքև սլաքը՝ ընտրությունը թերթի վերջին տողն ընդարձակելու համար: .
3. Սեղմեք Ctrl + 9՝ ընտրված տողերը թաքցնելու համար: Կամ աջ սեղմեք ընտրվածի վրա, այնուհետև սեղմեք Թաքցնել :

Տողերը թաքցնելու համար սեղմեք Ctrl + A՝ ամբողջ թերթիկը ընտրելու համար, այնուհետև սեղմեք Ctrl + Shift + 9 բոլոր տողերը նորից տեսանելի դարձնելու համար։

Նման ձևով դուք կարող եք թաքցնել չօգտագործված դատարկ սյունակները ձեր տվյալների աջ կողմում: Մանրամասն քայլերի համար տե՛ս Թաքցնել չօգտագործված տողերը Excel-ում, որպեսզի տեսանելի լինի միայն աշխատանքային տարածքը:

Excel-ում դատարկ տողերը հեռացնելու ամենաարագ ճանապարհը

Չէ՞ որ նախորդ օրինակները կարդալիս զգում եք, որ մենք մուրճ ենք օգտագործում ընկույզը կոտրելու համար: Այստեղ, Ablebits-ում, մենք նախընտրում ենք չանել