Агуулгын хүснэгт
Энэхүү богино заавар нь Excel-ийн бусад мөр бүрийг шүүх эсвэл VBA кодоор хэрхэн устгахыг тайлбарладаг. Мөн та 3, 4 эсвэл өөр N-р мөр бүрийг хэрхэн устгах талаар сурах болно.
Excel-ийн ажлын хуудасны өөр мөрүүдийг устгах шаардлагатай олон нөхцөл байдал бий. Жишээлбэл, та өгөгдлийг тэгш долоо хоногоор (мөр 2, 4, 6, 8 гэх мэт) хадгалж, бүх сондгой долоо хоногуудыг (мөр 3, 5, 7 гэх мэт) өөр хуудас руу шилжүүлэхийг хүсэж болно.
Ерөнхийдөө Excel-ийн бусад мөр бүрийг устгах нь өөр мөрүүдийг сонгоход хүргэдэг. Мөрүүдийг сонгосны дараа Устгах товчийг дарахад л хангалттай. Цаашид энэ нийтлэлээс та Excel-ийн N-р мөр бүрийг хурдан сонгох, устгах хэд хэдэн арга техникийг сурах болно.
Excel дээрх бусад мөр бүрийг шүүлтүүрээр хэрхэн устгах
Үндсэндээ Excel-ийн бусад мөр бүрийг устгах нийтлэг арга бол: эхлээд та өөр мөрүүдийг шүүж, дараа нь тэдгээрийг сонгоод бүгдийг нэг дор устгана. Доорх нарийвчилсан алхмуудыг дагана уу:
- Анх өгөгдлийн хажууд байгаа хоосон баганад тэг болон нэгийн дарааллыг оруулна. Та эхний нүдэнд 0, хоёр дахь нүдэнд 1 гэж бичээд эхний хоёр нүдийг хуулж, өгөгдөл бүхий сүүлчийн нүд хүртэл баганын доош буулгаснаар үүнийг хурдан хийж болно.
Эсвэл та энэ томьёог ашиглаж болно:
=MOD(ROW(),2)Томъёоны логик нь маш энгийн: ROW функц нь одоогийн мөрийн дугаарыг буцаана, MOD функц.2-т хувааж, үлдэгдлийг бүхэл тоо болгон бөөрөнхийлсөнөөр буцаана.
Үүний үр дүнд та бүх тэгш мөрөнд 0 (учир нь 2-т үлдэгдэлгүйгээр хуваагддаг) ба бүх сондгой мөрөнд 1 байна:
- Тэгш, сондгой мөрүүдийг устгах эсэхээс хамаарч нэг эсвэл тэгийг шүүнэ үү.
Үүнийг хийхийн тулд Туслах багананыхаа дурын нүдийг сонгоод Өгөгдөл таб > Ангилах, шүүх бүлэгт очоод Шүүлтүүр дээр дарна уу. товч. Унждаг шүүлтүүрийн сумнууд толгойн бүх нүдэнд харагдах болно. Та Туслах баганад байгаа сум товчийг дарж, нүднүүдийн аль нэгийг чагтална уу:
- 0 тэгш мөрүүдийг устгахын тулд
- 1 сондгой мөрийг устгахын тулд
Энэ жишээн дээр бид "0" утгатай мөрүүдийг устгах гэж байгаа тул тэдгээрийг шүүнэ:
- Одоо бүх "1" мөрүүдийг нуусан. харагдах бүх "0" мөрийг сонгоод, сонголт дээр хулганы баруун товчийг дараад Мөр устгах дээр дарна уу:
- Дээрх алхам нь танд хоосон хүснэгт үлдээсэн. , гэхдээ санаа зовох хэрэггүй, "1" мөрүүд хэвээр байна. Тэдгээрийг дахин харагдуулахын тулд Шүүлтүүр товчийг дахин дарж автомат шүүлтүүрийг устгана уу:
- С баганад байгаа томъёо нь үлдсэн мөрүүдийг дахин тооцоолно. гэхдээ чамд хэрэггүй болсон. Та одоо Туслах баганыг аюулгүйгээр устгаж болно:
Үүний үр дүнд манай ажлын хуудсанд зөвхөн тэгш долоо хоногууд үлдэж, сондгой долоо хоногууд алга болсон!
Зөвлөгөө. Хэрэв та бүр нүүхийг хүсвэлөөр мөрийг бүхэлд нь устгахын оронд өөр газар луу шилжүүлж, эхлээд шүүсэн мөрүүдийг хуулж шинэ байршилд буулгаж, дараа нь шүүсэн мөрүүдийг устгана уу.
Excel дээр VBA-р ээлжлэн мөрүүдийг хэрхэн устгах вэ
Хэрэв та Excel-ийн ажлын хуудасны бусад мөр бүрийг устгах гэх мэт өчүүхэн ажилд цаг заваа үрэх хүсэлгүй байгаа бол дараах VBA макро нь танд үйл явцыг автоматжуулах боломжтой:
Sub Delete_Alternate_Rows_Excel() SourceRange-г муж болгон тохируулна уу. = Application.Selection Set SourceRange = Application.InputBox( "Муж:" , "Мужийг сонгох" , SourceRange.Address, Төрөл :=8) Хэрэв SourceRange.Rows.Count >= 2 бол FirstCell-ийг муж болгон бүдэгрүүлж, RowIndex-ийг бүхэл тоогоор бүдгэрүүлнэ. Application.ScreenUpdating = RowIndex-д худал = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) 1-р алхам -2-т тохируулна уу FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Delete Next Application.Screen. End If End SubМакро ашиглан Excel-ийн бусад мөр бүрийг хэрхэн устгах вэ
I Visual Basic Editor-оор дамжуулан өөрийн ажлын хуудсанд макро ердийн аргаар оруулна уу:
- Alt + F11 товчийг дарж Visual Basic for Applications цонхыг нээнэ үү.
- Дээд цэсний мөрөнд, Оруулах > Модуль дээр дарж, дээрх макрог Модуль
- -д буулгаж, F5 товчийг дарж макро ажиллуулна уу.
- Харилцах цонх гарч ирэх бөгөөд та мужийг сонгохыг хүсэх болно. Хүснэгтээ сонгоод товшино ууOK:
Боллоо! Сонгосон муж дахь бусад мөр бүрийг устгасан:
Excel дээрх N-р мөр бүрийг хэрхэн устгах вэ
Энэ даалгаврын хувьд бид шүүлтүүрийг өргөтгөх гэж байна. Бидний бусад мөр бүрийг арилгахад ашигласан техник. Ялгаа нь шүүлтүүрийг үндэслэсэн томъёонд байна:
MOD(ROW()- m, n)Хаана:
- m нь өгөгдөлтэй эхний нүдний мөрийн дугаар 1
- n нь устгахыг хүсэж буй N-р мөр
Таны өгөгдөл 2-р эгнээнээс эхэлсэн бөгөөд та 3-р мөр бүрийг устгахыг хүсэж байна гэж бодъё. Тэгэхээр, таны томъёонд n нь 3, m нь 1 (мөр 2 хасах 1):
=MOD(ROW() - 1, 3)
Хэрэв бидний өгөгдөл дараахаас эхэлсэн бол 3-р эгнээ, дараа нь m 2-тэй тэнцүү байна (мөр 3-аас 1-ийг хасах) гэх мэт. Энэ залруулга нь 1-ийн тооноос эхлэн мөрүүдийг дараалан дугаарлахад шаардлагатай.
Томьёо нь харьцангуй мөрийн дугаарыг 3-т хувааж, хуваасны дараа үлдэгдлийг буцаана. Манай тохиолдолд энэ нь гурав дахь эгнээ болгонд тэг гарна, учир нь гурав дахь тоо бүр 3-т үлдэгдэлгүй хуваагддаг (3,6,9 гэх мэт):
Мөн одоо та "0" мөрийг шүүх аль хэдийн мэддэг алхмуудыг хийгээрэй:
- Хүснэгтийнхээ дурын нүдийг сонгоод Өгөгдөл дээрх Шүүлтүүр товчийг дарна уу.
- Тусламжийн баганыг зөвхөн "0" утгыг харуулахын тулд шүүнэ үү.
- Харагдах бүх "0" мөрийг сонгоод хулганы баруун товчийг дараад контекст цэснээс Мөр устгах -г сонгоно уу.
- Шүүлтүүрийг арилгах баТуслах баганыг устгана уу.
Үүнтэй адилаар та Excel-ийн 4, 5 эсвэл өөр N-р мөр бүрийг устгаж болно.
Зөвлөгөө. Хэрэв танд хамааралгүй өгөгдөл бүхий мөрүүдийг устгах шаардлагатай бол дараах заавар танд хэрэг болно: Нүдний утгад тулгуурлан мөрийг хэрхэн устгах тухай.
Уншиж байгаад баярлалаа, ирэх долоо хоногт тантай манай блог дээр дахин уулзана гэж найдаж байна. .
