Բովանդակություն
Ուսուցումը կսովորեցնի ձեզ, թե ինչպես հեռացնել դատարկ սյունակները Excel-ում մակրոյով, բանաձևով և կոճակի սեղմումով:
Որքան էլ չնչին թվա, Excel-ում դատարկ սյունակները ջնջելը շատ բան է: ոչ մի բան, որը հնարավոր է իրականացնել մկնիկի սեղմումով: Դա հնարավոր չէ անել նաև երկու կտտոցով: Ձեր աշխատաթերթի բոլոր սյունակները վերանայելու և դատարկերը ձեռքով հեռացնելու հեռանկարը միանշանակ մի բան է, որից կցանկանայիք խուսափել: Բարեբախտաբար, Microsoft Excel-ը տրամադրում է շատ տարբեր հնարավորություններ, և այդ հնարավորությունները ստեղծագործական եղանակներով օգտագործելով՝ կարող եք հաղթահարել գրեթե ցանկացած խնդիր:
Դատարկ սյունակները ջնջելու արագ միջոց, որը երբեք չպետք է լինի: օգտագործել
Երբ խոսքը վերաբերում է Excel-ում դատարկ տեղերը հեռացնելուն (լինի դա դատարկ բջիջներ, տողեր կամ սյունակներ), շատ առցանց ռեսուրսներ հիմնվում են Անցնել Հատուկ > Դատարկ հրաման. Երբեք դա մի արեք ձեր աշխատաթերթերում:
Այս մեթոդը ( F5 > Հատուկ… > Դատարկ ) գտնում է և ընտրում է բոլոր դատարկ բջիջները միջակայքում.
Եթե այժմ աջ սեղմեք ընտրված բջիջների վրա և ընտրեք Ջնջել > Ամբողջ սյունակը , բոլոր սյունակները, որոնք պարունակում են առնվազն մեկ դատարկ բջիջ կկորչեն: Եթե դուք ակամա արել եք դա, սեղմեք Ctrl + Z՝ ամեն ինչ ետ ստանալու համար:
Այժմ, երբ դուք գիտեք Excel-ի դատարկ սյունակները ջնջելու սխալ եղանակը, տեսնենք, թե ինչպես դա անել ճիշտ:
Ինչպես հեռացնել դատարկ սյունակները Excel-ում VBA-ով
ՓորձառուExcel-ի օգտատերերը գիտեն այս հիմնական կանոնը. ժամեր չվատնելու համար ձեռքով ինչ-որ բան անելու համար, մի քանի րոպե ծախսեք մակրո գրելու վրա, որը դա կանի ձեզ համար ավտոմատ կերպով:
Ստորև VBA մակրոն հեռացնում է ընտրված բոլոր դատարկ սյունակները: միջակայք. Եվ դա անում է անվտանգ. ջնջվում են միայն բացարձակապես դատարկ սյունակները: Եթե սյունակը պարունակում է մեկ բջիջի արժեք, նույնիսկ դատարկ տող, որը վերադարձվել է ինչ-որ բանաձևով, այդպիսի սյունակը կմնա անփոփոխ:
Excel մակրո. հեռացնել դատարկ սյունակները Excel թերթից Public Sub DeleteEmptyColumns() Dim SourceRange As Range Dim EntireColumn As Range Սխալի դեպքում Վերսկսել Հաջորդ Սահմանել SourceRange = Application.InputBox( _ «Ընտրեք տիրույթ. For i = SourceRange.Columns.Count To 1 Step -1 Սահմանել EntireColumn = SourceRange.Cells(1, i).EntireColumn If Application.WorksheetFunction.CountA(EntireColumn) = 0 Այնուհետեւ EntireColumn.Delete End If NextUpplication.Scre End. Եթե End SubԻնչպես օգտագործել Delete Empty Columns մակրո
Ահա մակրո Excel-ին ավելացնելու քայլերը.
- Սեղմեք Alt + F11 Visual Basic-ը բացելու համար: Խմբագիր։
- Մենյուի տողում սեղմեք Տեղադրել > Մոդուլ ։
- Տեղադրեք վերը նշված կոդը կոդի պատուհանում։ w.
- Սեղմեք F5՝ մակրո գործարկելու համար:
- Երբ հայտնվի թռուցիկ երկխոսություն, անցեք դեպիհետաքրքրող աշխատաթերթը, ընտրեք ցանկալի տիրույթը և սեղմեք OK:
Եթե չեք ցանկանում մակրո ավելացնել ձեր աշխատաթերթին, կարող եք այն գործարկել մեր կայքից: աշխատանքային գրքույկի նմուշ: Ահա թե ինչպես.
- Ներբեռնեք մեր աշխատանքային գրքույկի նմուշը Excel-ում դատարկ սյունակներ հեռացնելու համար, բացեք այն և միացրեք բովանդակությունը, եթե ձեզ հուշում է:
- Բացեք ձեր սեփական աշխատանքային գիրքը կամ անցեք արդեն բացվածին:
- Ձեր աշխատանքային գրքում սեղմեք Alt + F8 , ընտրեք DeleteEmptyColumns մակրո և սեղմեք Գործարկել :
- Բացվող երկխոսության մեջ ընտրեք միջակայքը և սեղմեք Լավ :
Այսինքն, ընտրված տիրույթի բոլոր դատարկ սյունակները կջնջվեն.
Բանորոշել և ջնջել դատարկ սյունակները Excel-ում բանաձևով
Վերոնշյալ մակրոն արագ և լուռ հեռացնում է դատարկ սյունակները: Բայց եթե դուք «հսկողության տակ պահեք ամեն ինչ» մարդ եք (ինչպես ես :), կարող եք տեսողականորեն տեսնել այն սյունակները, որոնք պատրաստվում են հեռացնել: Այս օրինակում մենք նախ կբացահայտենք դատարկ սյունակները՝ օգտագործելով բանաձև, որպեսզի կարողանաք արագ վերանայել դրանք, ապա վերացնել այդ սյունակներից բոլորը կամ դրանցից մի քանիսը:
Նշում: Ինչ-որ բան ընդմիշտ ջնջելուց առաջ, հատկապես անհայտ տեխնիկայի կիրառմամբ, ես խստորեն խորհուրդ եմ տալիս ձեր աշխատանքային գրքույկի պահուստային պատճենը պատրաստել, որպեսզի ապահով կողմում լինեք, եթե ինչ-որ բան սխալ լինի:
պահուստային պատճեն ապահով տեղում, կատարեք հետևյալ քայլերը.
Քայլ 1. Տեղադրեք նորտող
Ավելացրեք նոր տող ձեր աղյուսակի վերևում: Դրա համար աջ սեղմեք առաջին տողի վերնագրի վրա և սեղմեք Տեղադրել : Մի անհանգստացեք ձեր տվյալների կառուցվածքը/դասավորությունը խաթարելու համար, դուք կարող եք ջնջել այս տողը ավելի ուշ:
Քայլ 2. Որոշեք դատարկ սյունակները
Ձախ կողմում նոր ավելացված տողի բջիջում մուտքագրեք հետևյալ բանաձևը.
=COUNTA(A2:A1048576)=0
Եվ այնուհետև պատճենեք բանաձևը մյուս սյունակներում՝ քաշելով լրացման բռնիչը:
Բանաձևի տրամաբանությունը շատ պարզ է. COUNTA-ն ստուգում է սյունակում դատարկ բջիջների քանակը՝ 2-րդ տողից մինչև 1048576 տող, որը առավելագույն տող է Excel 2019-2007-ում: Դուք այդ թիվը համեմատում եք զրոյի հետ և արդյունքում՝ դատարկ սյունակներում ունեք TRUE և FALSE սյունակներում, որոնք պարունակում են առնվազն մեկ ոչ դատարկ բջիջ: Հարաբերական բջիջների հղումների օգտագործման շնորհիվ բանաձևը պատշաճ կերպով հարմարվում է յուրաքանչյուր սյունակի համար, որտեղ այն պատճենվում է:
Այն դեպքում, երբ աշխատաթերթը տեղադրում եք մեկ ուրիշի համար, կարող եք ցանկանում եք պիտակավորել սյունակները ավելի իմաստալից կերպով: Խնդիր չկա, դա կարելի է հեշտությամբ անել IF-ի նման հայտարարությամբ.
=IF(COUNTA(A2:A1048576)=0, "Blank", "Not blank")
Այժմ բանաձևը հստակ ցույց է տալիս, թե որ սյունակները դատարկ են, իսկ որոնք՝ ոչ.
Խորհուրդ. Համեմատած մակրոների հետ՝ այս մեթոդը ձեզ ավելի մեծ ճկունություն է տալիս այն հարցում, թե որ սյունակները պետք է համարվեն դատարկ: Այս օրինակում մենք ստուգում ենք ամբողջ աղյուսակը, ներառյալ վերնագրի տողը: Դա նշանակում է, եթե սյունակպարունակում է միայն վերնագիր, նման սյունակը չի համարվում դատարկ և չի ջնջվում: Եթե ցանկանում եք ստուգել միայն տվյալների տողերը անտեսելով սյունակների վերնագրերը , հեռացրեք վերնագրի տող(ները) թիրախային միջակայքից (A3:A1048576): Արդյունքում, այն սյունակը, որն ունի վերնագիր և այլ տվյալներ չունի, կհամարվի դատարկ և ենթակա է ջնջման: Նաև կարող եք սահմանափակել միջակայքը մինչև վերջին օգտագործված տողը, որը մեր դեպքում կլինի A11:
Քայլ 3. Հեռացրեք դատարկ սյունակները
Ունենալով ողջամիտ թվով սյունակներ, կարող եք պարզապես ընտրել նրանք, որոնք առաջին շարքում ունեն «Դատարկ» (մի քանի սյունակ ընտրելու համար պահեք Ctrl ստեղնը, երբ սեղմում եք սյունակի տառերը): Այնուհետև աջ սեղմեք ցանկացած ընտրված սյունակում և ընտրեք Ջնջել համատեքստի ընտրացանկից.
Եթե ձեր աշխատաթերթում կան տասնյակ կամ հարյուրավոր սյունակներ, իմաստ ունի բոլոր դատարկները տեսնելու համար բերել: Դրա համար կատարեք հետևյալը.
- Ընտրեք վերին տողը բանաձևերով, գնացեք Տվյալներ ներդիր > Տեսակավորել և զտել խումբ և սեղմեք Տեսակավորել կոճակը:
- Զգուշացման երկխոսության դաշտում, որը երևում է, ընտրեք Ընդարձակել ընտրությունը և սեղմեք Տեսակավորել…
- Սա կբացի Տեսակավորել երկխոսության տուփը, որտեղ սեղմում եք Ընտրանքներ… կոճակը, ընտրում Տեսակավորել ձախից աջ, և սեղմեք Լավ ։
- Կարգավորեք միայն մեկ տեսակավորման մակարդակ, ինչպես ցույց է տրված ստորև և սեղմեք Լավ.
- Տեսակավորել ըստ՝ տող 1
- Տեսակավորել. ԲջջԱրժեքներ
- Պատվեր՝ A-ից Z
Արդյունքում, դատարկ սյունակները կտեղափոխվեն ձեր աշխատաթերթի ձախ մաս.
- Ընտրեք բոլոր դատարկ սյունակները - սեղմեք առաջին սյունակի տառի վրա, սեղմեք Shift, ապա սեղմեք վերջին դատարկ սյունակի տառը:
- Աջ- սեղմեք ընտրված սյունակները և բացվող ընտրացանկից ընտրեք Ջնջել :
Կատարված է: Դուք ազատվել եք դատարկ սյունակներից, և այժմ ոչինչ չի խանգարում ձեզ վերին տողը ջնջել բանաձևերով:
Excel-ում դատարկ սյունակները հեռացնելու ամենաարագ ճանապարհը
Այս ձեռնարկի սկզբում ես գրեցի, որ Excel-ում դատարկ սյունակները ջնջելու մեկ սեղմումով եղանակ չկա: Իրականում դա այնքան էլ ճիշտ չէ: Ես պետք է ասեի, որ ներկառուցված ճանապարհ չկա: Մեր Ultimate Suite-ի օգտատերերը կարող են Excel-ում բացթողումներ հեռացնել բառացիորեն մի քանի կտտոցով :)
Նպատակային աշխատաթերթում անցեք Ablebits Tools ներդիրին, սեղմեք Ջնջել դատարկները և ընտրեք Դատարկ սյունակներ :
Որպեսզի համոզվեք, որ դա մկնիկի պատահական սեղմում չէ, հավելումը ձեզ կխնդրի հաստատել, որ դուք իսկապես ցանկանում եք հեռացնել դատարկ սյունակները այդ աշխատաթերթից.
Սեղմեք OK , և մի պահ բոլոր դատարկ սյունակները կվերանան:
Ինչպես վերը քննարկված մակրոները, այս գործիքը ջնջում է միայն այն սյունակները, որոնք բացարձակ դատարկ են : Սյունակներն են, որոնք ունեն որևէ մեկ արժեք, ներառյալ վերնագրերըպահպանված է:
Delete Blanks -ը տասնյակ հրաշալի հնարավորություններից մեկն է, որը կարող է հեշտացնել ձեր կյանքը որպես Excel-ի օգտատեր: Ավելին գտնելու համար կարող եք ներբեռնել Excel-ի մեր Ultimate Suite-ի փորձնական տարբերակը:
Դատարկ սյունակները չեն ջնջվում: Ինչո՞ւ:
Խնդիր . Դուք փորձել եք վերը նշված բոլոր մեթոդները, սակայն մեկ կամ մի քանի դատարկ սյունակներ մնացել են ձեր աշխատաթերթում: Ինչո՞ւ:
Ամենայն հավանականությամբ, քանի որ այդ սյունակները իրականում դատարկ չեն: Մարդկային աչքին անտեսանելի շատ տարբեր նիշեր կարող են աննկատ մնալ ձեր Excel աղյուսակներում, հատկապես, եթե դուք տեղեկատվություն եք ներմուծել արտաքին աղբյուրից: Դա կարող է լինել դատարկ տող կամ բացատ նիշ, չընդհատվող տարածություն կամ այլ ոչ տպագրող նիշ:
Մեղավորին հայտնաբերելու համար ընտրեք խնդրահարույց սյունակի առաջին բջիջը և սեղմեք Ctrl + ներքև սլաքը: . Օրինակ, ստորև ներկայացված սքրինշոթի C սյունակը դատարկ չէ C6-ում մեկ բացատ նիշի պատճառով.
Կրկնակի սեղմեք բջիջի վրա՝ տեսնելու, թե իրականում ինչ կա դրա մեջ կամ պարզապես սեղմեք Ջնջել ստեղնը՝ անհայտ բանից ազատվելու համար: Եվ հետո կրկնեք վերը նշված գործընթացը՝ պարզելու համար, թե արդյոք այդ սյունակում այլ անտեսանելի բաներ կան: Կարող եք նաև մաքրել ձեր տվյալները՝ հեռացնելով առաջատար, հետին և չընդհատվող բացատները:
Շնորհակալ եմ կարդալու համար և հուսով եմ, որ հաջորդ շաբաթ կտեսնենք ձեզ մեր բլոգում: