Энэ заавар нь Excel-ийн хоосон баганыг хэрхэн макро, томьёо болон товчлуур дээр дарж арилгахыг заах болно.

Excel-д хоосон баганыг устгах нь энгийн мэт санагдаж болох ч юм. зүгээр л хулганы товшилтоор хийж болох зүйл биш. Үүнийг хоёр товшилтоор хийх боломжгүй. Ажлын хуудасны бүх баганыг шалгаж, хоосон хэсгийг гараар арилгах нь таны зайлсхийхийг хүсч буй зүйл юм. Аз болоход Microsoft Excel нь маш олон янзын функцээр хангадаг бөгөөд эдгээр функцуудыг бүтээлч байдлаар ашигласнаар та бараг ямар ч ажлыг даван туулах боломжтой!

Хэзээ ч хэрэггүй хоосон баганыг устгах хурдан арга. ашиглах

Excel дээрх хоосон зайг арилгах тухайд (хоосон нүд, мөр, багана ч бай) олон онлайн эх сурвалжууд Тусгай руу очих > Хоосон хэсгүүд<2 дээр тулгуурладаг> тушаал. Хэзээ ч үүнийг хийж болохгүй ажлын хуудсан дээрээ!

Энэ арга ( F5 > Тусгай... > Хоосон ) мөн муж дахь бүх хоосон нүднүүдийг сонгоно:

Хэрэв та одоо сонгосон нүднүүдийн баруун товчийг дараад Устгах > Бүтэн багана , дор хаяж нэг хоосон нүд агуулсан бүх багана алга болно! Хэрэв та үүнийг санамсаргүйгээр хийсэн бол бүгдийг буцааж авахын тулд Ctrl + Z дарна уу.

Одоо та Excel-ийн хоосон баганыг устгах буруу аргыг мэдэж байгаа тул үүнийг хэрхэн зөв хийхийг харцгаая.

Excel дээр хоосон баганыг VBA-тай хэрхэн арилгах талаар

ТуршлагатайExcel-ийн хэрэглэгчид энэ дүрмийг мэддэг: гараар ямар нэг зүйл хийхэд цаг үрэхгүй, автоматаар хийх макро бичихэд хэдэн минут зарцуул.

Доорх VBA макро нь сонгосон бүх хоосон баганыг арилгадаг. хүрээ. Энэ нь үүнийг аюулгүйгээр хийдэг - зөвхөн туйлын хоосон багануудыг устгадаг. Хэрэв багана нь нэг нүдний утгыг агуулж байгаа бол ямар нэг томьёогоор буцаасан хоосон мөр ч гэсэн ийм багана хэвээр үлдэнэ.

Excel макро: Excel хуудаснаас хоосон баганыг устгах Public Sub DeleteEmptyColumns() Dim SourceRange Range болгон Dim EntireColumn Range зэрэг Алдааны тухай үргэлжлүүлэх Дараачийн тохируулна SourceRange = Application.InputBox( _ "Муж сонгох:" , "Хоосон багануудыг устгах" , _ Application.Selection.Address, Type :=8) Хэрэв тийм биш бол (SourceRange юу ч биш ) Дараа нь Application.ScreenUpdating = Худал. i = SourceRange.Columns.Count хүртэл 1 Алхам -1-д тохируулна. Бүхэл багана = SourceRange.Cells(1, i).Бүтэн багана Хэрэв Application.WorksheetFunction.CountA(EntireColumn) = 0 Дараа нь бүхэл баганын.Delete End If Next Application.Screend = TrueU If End Sub

Хоосон баганыг устгах макрог хэрхэн ашиглах вэ

Эксел дээрээ макро нэмэх алхмууд энд байна:

1. Visual Basic програмыг нээхийн тулд Alt + F11 товчийг дарна уу. Засварлагч.
2. Цэсний мөрөнд Оруулах > Модуль дээр товшино уу.
3. Дээрх кодыг Code цонхонд буулгана уу. w.
4. Макро ажиллуулахын тулд F5 товчийг дарна уу.
5. Попап харилцах цонх гарч ирэх үедсонирхсон ажлын хуудаснаас хүссэн мужаа сонгоод OK товчийг дарна уу:

Хэрэв та ажлын хуудсандаа макро нэмэхийг хүсэхгүй байвал манайхаас ажиллуулж болно. ажлын номны жишээ. Үүнд:

1. Excel-ийн хоосон баганыг арилгахын тулд бидний жишээ ажлын номыг татаж аваад, нээж, асуувал контентыг идэвхжүүлнэ үү.
2. Өөрийн ажлын номыг нээх эсвэл аль хэдийн нээгдсэн ном руу шилжинэ үү.
3. Ажлын дэвтэртээ Alt + F8 дарж, Устгах хоосон багана макро сонгоод Ажиллуулах -г товшино уу.
4. Попап гарч ирэх харилцах цонхноос сонгоно уу. мужийг сонгоод OK -г товшино уу.

Ямар ч тохиолдолд сонгосон муж дахь бүх хоосон баганыг устгана:

Excel програмын хоосон баганыг томьёогоор тодорхойлж устгах

Дээрх макро нь хоосон баганыг хурдан бөгөөд чимээгүй арилгадаг. Гэхдээ хэрэв та "бүхнийг хяналтандаа байлгадаг" төрлийн хүн бол (над шиг :) та устгах гэж буй багануудыг нүдээр харахыг хүсч болно. Энэ жишээн дээр бид эхлээд томьёо ашиглан хоосон баганыг тодорхойлох бөгөөд ингэснээр та тэдгээрийг хурдан хянаж, дараа нь эдгээр баганыг бүгдийг эсвэл заримыг нь хасна.

Анхаар. Аливаа зүйлийг бүрмөсөн устгахын өмнө, ялангуяа үл мэдэгдэх техник ашиглан, ямар нэг зүйл буруу болвол аюулгүй байх үүднээс ажлын дэвтрээ нөөц хуулбарлах хийхийг танд зөвлөж байна.

нөөц хуулбарыг аюулгүй газар хадгалах бол дараах алхмуудыг хийгээрэй:

Алхам 1. Шинэ файл оруулахэгнээ

Хүснэгтийнхээ дээд талд шинэ мөр нэмнэ үү. Үүний тулд эхний эгнээний толгой дээр хулганы баруун товчийг дараад Insert дээр дарна уу. Өгөгдлийнхөө бүтэц/зохицуулалттай холбоотой асуудалд санаа зовох хэрэггүй - та энэ мөрийг дараа устгаж болно.

Алхам 2. Хоосон баганыг тодорхойлох

Хамгийн зүүн талд шинээр нэмэгдсэн мөрийн нүдэнд дараах томьёог оруулна:

=COUNTA(A2:A1048576)=0

Дараа нь бөглөх бариулыг чирж томьёог бусад баганууд руу хуулна.

Томьёоны логик маш энгийн: COUNTA нь 2-р мөрөөс 1048576 хүртэлх багана дахь хоосон нүднүүдийн тоог шалгадаг бөгөөд энэ нь Excel 2019 - 2007-д мөрийн дээд хэмжээ юм. Та энэ тоог тэгтэй харьцуулж, үр дүнд нь хоосон баганад ҮНЭН гэсэн утгатай байна. болон доод тал нь нэг хоосон нүд агуулсан баганад ХУДАЛ. Харьцангуй нүдний лавлагаа ашигладаг тул томьёо нь хуулж байгаа багана тус бүрийг зөв тохируулдаг.

Хэрэв та өөр хүнд зориулж ажлын хуудсыг тохируулж байгаа бол багануудыг илүү утга учиртай болгохыг хүсч байна. Асуудалгүй, үүнийг үүнтэй төстэй IF хэллэгээр хялбархан хийж болно:

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

Одоо томъёо нь аль багана хоосон, аль нь хоосон болохыг тодорхой зааж өгсөн болно:

Зөвлөгөө. Макротой харьцуулахад энэ арга нь аль баганыг хоосон гэж үзэх талаар илүү уян хатан болгодог. Энэ жишээнд бид хүснэгтийг бүхэлд нь, түүний дотор толгойн мөрийг шалгана. Хэрэв багана гэсэн үгзөвхөн толгой хэсгийг агуулсан, ийм баганыг хоосон гэж үзэхгүй бөгөөд устгагдахгүй. Хэрэв та зөвхөн өгөгдлийн мөрүүдийг шалгахыг хүсвэл баганын толгой хэсгийг үл тоомсорлож , зорилтот мужаас толгой мөр(үүд)-ийг устгана уу (A3:A1048576). Үүний үр дүнд гарчигтай, өөр өгөгдөлгүй баганыг хоосон гэж тооцож, устгах болно. Мөн та мужийг хамгийн сүүлд ашигласан мөр хүртэл хязгаарлаж болно, энэ нь манай тохиолдолд A11 байх болно.

Алхам 3. Хоосон баганыг арилгах

Боломжийн тооны баганатай бол та зүгээр л сонгож болно. эхний мөрөнд "Хоосон" байгаа хүмүүс (олон баганыг сонгохын тулд баганын үсгүүдийг дарж Ctrl товчийг дарна уу). Дараа нь сонгосон аль нэг багана дээр хулганы баруун товчийг дараад контекст цэснээс Устгах -г сонгоно уу:

Хэрэв таны ажлын хуудсанд хэдэн арван эсвэл хэдэн зуун багана байгаа бол, Бүх хоосон зүйлийг авчрах нь утга учиртай. Үүний тулд дараах зүйлийг хийнэ үү:

1. Томьёо бүхий дээд мөрийг сонгоод Өгөгдөл таб > Ангилах, шүүх бүлэгт очиж, Ангилах товч.
2. Харагдах анхааруулах цонхноос Сонголтыг өргөжүүлэх -г сонгоод Ангилах...

   дээр дарна уу.

3. Энэ нь Ангилах харилцах цонхыг нээх бөгөөд Сонголтууд... товчийг дарж, Зүүнээс баруун тийш эрэмбэлэх, -г сонгоод. OK -г товшино уу.

   

4. Доор үзүүлсэн шиг зөвхөн нэг эрэмбэлэх түвшинг тохируулаад OK дээр дарна уу:
   • Ангилах: Мөр 1
   • Ангилах: НүдУтга
   • Захиалга: A-аас Z

   

   Үүний үр дүнд хоосон баганууд таны ажлын хуудасны зүүн хэсэг рүү шилжих болно:

   

5. Бүх хоосон баганыг сонгоно уу - эхний баганын үсэг дээр товшоод Shift товчийг дараад сүүлчийн хоосон баганын үсгийг дарна уу.
6. Баруун- сонгосон баганууд дээр товшоод гарч ирэх цэснээс Устгах -г сонгоно уу.

   

Дууссан! Та хоосон багануудаас салсан бөгөөд томьёоны дээд мөрийг устгахад юу ч саад болохгүй.

Excel дээр хоосон баганыг устгах хамгийн хурдан арга

Энэ хичээлийн эхэнд би Excel дээр хоосон баганыг нэг товшилтоор устгах арга байхгүй гэж бичсэн. Үнэндээ энэ нь яг үнэн биш юм. Дотоод зам байхгүй гэж би хэлэх ёстой байсан. Манай Ultimate Suite-ийн хэрэглэгчид Excel-ийн хоосон зайг хэд хэдэн товшилтоор арилгах боломжтой :)

Зорилтот ажлын хуудасны Ablebits Tools таб руу шилжиж, Хоосон хоосон зайг устгах<дээр товшино уу. 2>-г сонгоод Баганыг хоосон :

Хулгана санамсаргүй товшилт болоогүй эсэхийг шалгахын тулд нэмэлт хэрэгсэл танаас үүнийг баталгаажуулахыг хүсэх болно. Та үнэхээр тэр ажлын хуудаснаас хоосон баганыг устгахыг хүсэж байна:

OK -г товшоод хэсэг хугацааны дараа бүх хоосон баганууд алга болно!

Дээр хэлэлцсэн макроны нэгэн адил энэ хэрэгсэл нь зөвхөн бүрэн хоосон багануудыг устгадаг. Толгой хэсгийг оруулаад дурын нэг утгатай баганахадгалагдсан.

Хоосон хоосон зайг устгах нь Excel-ийн хэрэглэгчийн хувьд таны амьдралыг хөнгөвчлөх олон арван гайхалтай функцүүдийн нэг юм. Илүү ихийг олж мэдэхийн тулд та Excel-д зориулсан Ultimate Suite-н туршилтын хувилбарыг татаж авах боломжтой.

Хоосон баганыг устгахгүй! Яагаад?

Асуудал : Та дээрх бүх аргуудыг туршиж үзсэн боловч таны ажлын хуудсанд нэг буюу хэд хэдэн хоосон багана гацсан байна. Яагаад?

Тэдгээр баганууд үнэхээр хоосон биш байх магадлалтай. Хүний нүдэнд үл үзэгдэх олон янзын тэмдэгтүүд таны Excel-ийн хүснэгтэд анзаарагдахгүй байж болно, ялангуяа та гадны эх сурвалжаас мэдээлэл импортолсон бол. Энэ нь зүгээр л хоосон мөр эсвэл зай тэмдэгт, тасрахгүй зай эсвэл бусад хэвлэхгүй тэмдэгт байж болно.

Гэм буруутныг тогтоохын тулд асуудалтай баганын эхний нүдийг сонгоод Ctrl + доош сумыг дарна уу. . Жишээлбэл, доорх дэлгэцийн зургийн C багана нь C6-д нэг хоосон зай байгаа тул хоосон биш байна:

Нүдэнд юу байгааг харахын тулд хоёр товших эсвэл зүгээр л Үл мэдэгдэх зүйлээс салахын тулд Устгах товчийг дарна уу. Дараа нь дээрх багананд үл үзэгдэх бусад зүйлс байгаа эсэхийг мэдэхийн тулд дээрх үйлдлийг давтан хийнэ. Та мөн эхний, дараалсан, тасрахгүй зайг арилгах замаар өгөгдлөө цэвэрлэхийг хүсэж болно.

Уншсанд баярлалаа, ирэх долоо хоногт тантай манай блог дээр уулзана гэж найдаж байна!