Mundarija
Yaxshiroq o'qilishi uchun Excelda katta ma'lumotlar to'plamidan foydalanganda ba'zida ba'zi bir qatorlarni yashirishimiz kerak bo'ladi. VBA makro ni amalga oshirish Excelda har qanday operatsiyani bajarishning eng samarali, eng tez va xavfsiz usuli hisoblanadi. Ushbu maqolada biz sizga VBA makrosidan foydalangan holda turli mezonlarga asoslanib Excelda qatorlarni qanday yashirishni ko'rsatamiz.
Ishchi kitobni yuklab oling
Siz Bu yerdan bepul Excel ish kitobini yuklab olishingiz mumkin.
VBA.xlsm bilan qatorlarni yashirish
Excelda qatorlarni yashirishning VBA bilan 14 usuli
Ushbu bo'limda Excelda VBA va satrlarni yashirish bilan 12 xil usulni muhokama qilamiz. Biz butun maqola davomida ishlatadigan misol quyida ko'rsatilgan.
1. Excelda bitta qatorni yashirish uchun VBA-ni joylashtiring
Agar VBA kodi bilan bitta qatorni yashirishni istasangiz, quyida muhokama qilingan amallarni bajaring. Bizning holatda, biz 5-qator raqamini ( Familiya ) maʼlumotlar majmuamizdan yashiramiz.
Qadamlar:
- Klaviaturangizda Alt + F11 tugmalarini bosing yoki Dasturchi -> Visual Basic Visual Basic Editor -ni ochish uchun.
- Qalqib chiquvchi kodda oynasida, menyu satridan Qo'shish -> Modul .
- Quyidagi koddan nusxa oling va kod oynasiga joylashtiring.
4126
Sizning kodingiz hozir tayyor“ Kimyo ” yashirin.
14. Excelda katakchaning son qiymatiga asoslangan qatorlarni yashirish uchun makros
Ilgari siz hujayra matn qiymatiga asoslangan qatorni qanday yashirishni ko'rgan bo'lsangiz, bu safar buni qanday qilishni o'rganasiz qiymat. raqamli hisoblanadi . Bizning holatda, biz sizga " 87 ", 7-qator raqamli qiymatini o'z ichiga olgan qatorga misol keltiramiz va bu qatorni qanday yashirish kerakligi haqidagi kodni taqdim etamiz.
Qadamlar:
- Dasturchi yorlig'idan Visual Basic Editor ni oching va Qo'shish a Module kod oynasida.
- Kod oynasida quyidagi koddan nusxa oling va uni joylashtiring.
9191
Sizning kodingiz endi ishlashga tayyor.
Bu yerda
- StartRow = 4 -> Maʼlumotlar toʻplamining birinchi qatori .
- LastRow = 10 -> Ma'lumotlar to'plamining oxirgi qatori .
- iCol = 4 -> ustun manzili , bu matn qiymatiga ega.
- Ishga tushirish kodini kiriting va “ 87 ” raqamli qiymatidan iborat satr raqami 7 yashiringanligiga e’tibor bering.
Ko'proq o'qing: Excelda hujayra qiymatiga qarab qatorlarni qanday yashirish mumkin (5 usul)
Xulosa
Ushbu maqolada Excelda VBA yordamida satrlarni qanday yashirish mumkin. Umid qilamanki, ushbu maqola siz uchun juda foydali bo'ldi. Mavzu bo'yicha savollaringiz bo'lsa bemalol so'rang.
ishga tushiring.Bu yerda
- Ishchi varaqlar("Yagona") = ishchi varaq nomini o'rnating.
- Range(“5:5”) = Range usuli ichida qator raqami 5 ni oʻtkazing.
- Klaviaturangizda F5 tugmasini bosing yoki menyu panelidan Ishga tushirish -> Sub/UserForm ni ishga tushiring. Shuningdek, makrosni ishga tushirish uchun pastki menyu satridagi kichik o'ynash belgisini bosishingiz mumkin.
Quyidagi rasmga e'tibor bering. , 5-qator raqami VBA kodini bajargandan soʻng berkitiladi.
Batafsil oʻqing: Excelda qatorlarni yashirish formulasi (7 usul)
2. Excelda qo'shni qatorlarni yashirish uchun makrosni joylashtiring
Siz VBA yordamida bitta qatorni qanday yashirishni o'rgandingiz. Faraz qilaylik, siz qo'shni bo'lgan qatorlar oralig'ini yashirishni xohlaysiz. Buni Excelda VBA bilan ham qilishingiz mumkin. Biz yuqorida ko'rsatilgan ma'lumotlar to'plamimizdan yashiramiz 5 - 7 -sonli qatorlar.
Qadamlar:
- Bir xil avvalgidek, Developer yorlig'idan Visual Basic Editor -ni oching va kod oynasida Qo'shish Moduli ni oching.
- Kod oynasida quyidagi koddan nusxa oling va uni joylashtiring.
8036
Sizning kodingiz endi ishlashga tayyor.
Mana,
- Ishchi varaqlar("Qo'shni") = ishchi varaq nomini o'rnating.
- Diapazon("5:7") = Qator usuli ichida 5-qator raqami ni oʻtkazing.
- Ishga tushirish ushbu kodni kiriting va qarang 5-7-qatorlar hozir yashiringan quyidagi rasm.
Batafsil o'qing: Qanday qilib Excelda qatorlarni yashirish va ko'rsatish (6 ta eng oson yo'l)
3. Qo'shni bo'lmagan qatorlarni yashirish uchun makrosni joylashtirish
Bu safar siz VBA bilan qo'shni bo'lmagan bo'lgan Excelda qatorlarni yashirishni o'rganasiz. . Bizning ma'lumotlar to'plamimiz bilan yashirish 5, 6, 8 va 9 qatorlar uchun kod quyida keltirilgan.
Qadamlar:
- Avval ko'rsatilganidek, Developer yorlig'idan Visual Basic Editor -ni oching va kod oynasida Qo'shish Moduli ni oching.
- Kod oynasida quyidagi koddan nusxa ko'chiring va uni joylashtiring.
2000
Sizning kodingiz endi ishlashga tayyor.
Mana,
- Ish varaqlari("Qoʻshni boʻlmagan") = ishchi varaq nomini oʻrnating.
- Diapazon("5: 6, 8:9”) = Range usuli ichida 5-6-qator va 8-9 qatorlarini oʻtkazing.
- Ushbu kod qismini ishga tushiring va 5-6-qatorlar va 8-9 ekanligini koʻring. quyidagi rasmda yashiringan.
Batafsil o'qing: Excelda qatorlarni qanday yashirish mumkin (6 ta samarali usul)
4. Excelda matnlarni o'z ichiga olgan barcha qatorlarni yashirish uchun so'l
Agar siz matnli qiymatlarni o'z ichiga olgan barcha qatorlarni yashirishni istasangiz quyidagi amallarni bajaring.
Qadamlar:
- Ishlab chiquvchi yorlig'idan Visual Basic Editor -ni oching va Qo'shish a Module kod oynasida.
- Kod oynasida quyidagi koddan nusxa oling va uni joylashtiring.
9454
Sizning kodingiz endi ishlashga tayyor.
Bu yerda,
- IsNumeric(Range(“C” & i)) = Bizning maʼlumotlar toʻplamimizdagi maʼlumotlar <1dan boshlanadi>ustun C, shuning uchun biz C ni Range usuli ichida o'tkazdik.
- Ushbu kodni ishga tushiring va siz matnni o'z ichiga olgan qiymatlari bo'lgan barcha satrlar endi yashiringanini sezasiz.
Batafsil o'qing: Excelda bir nechta qatorlarni qanday ko'rsatish mumkin (9 usul)
5. Excelda raqamlarni o'z ichiga olgan barcha qatorlarni yopish uchun makros
Va agar siz raqamli qiymatlarni o'z ichiga olgan VBA kodli barcha qatorlarni yashirishni istasangiz, quyida keltirilgan amallarni bajaring.
Qadamlar:
- Ishlab chiquvchi yorlig'ida Visual Basic Editor ni oching va Modulini Qo'shish kod oynasida.
- Kod oynasida quyidagi koddan nusxa oling va uni joylashtiring.
4316
Sizning kodingiz endi ishlashga tayyor.
Bu yerda,
- IsNumeric(Range(“C” & i)) = Bizning ma'lumotlar to'plamimizdagi ma'lumotlar ustun C, dan boshlanadi, shuning uchun biz C ni diapazoni usul ichida o'tkazdik.
- Ushbu kodni ishga tushiring va avval raqamli qiymatlarni o'z ichiga olgan bo'lgan barcha qatorlar endi yashirin.
Batafsil o'qing: Excelda bitta ustunga asoslangan ikki nusxadagi qatorlarni yashirish(4 ta usul)
6. Excelda nol (0) ni o'z ichiga olgan qatorlarni yashirish uchun so'l
Faqat siz 0 (nol) bo'lgan ma'lum bir ustundagi satrlarni yashirishni xohlaysiz. Quyidagi ma'lumotlar to'plamiga qarang, bu erda E ustuni 7-qatorda 0 va 10-qator da 82 mavjud. Biz Excelda faqat 0 ( 7-qator ) bo'lgan qatorni VBA bilan yashirishni o'rganamiz.
Qadamlar:
- Dasturchi yorlig'idan Visual Basic Editor ni oching va Qo'shish a Module kod oynasida.
- Kod oynasida quyidagi koddan nusxa oling va uni joylashtiring.
8954
Sizning kodingiz endi ishlashga tayyor.
- Ushbu kodni ishga tushiring va 0
7-qator ) borligiga e'tibor bering. 2> in ustunidagi E endi yashirin, 82 ni ko'taruvchi 10 qator esa ko'rsatilmagan.
Batafsil o'qing: Excel VBA-da bo'sh qatorlarni qanday yashirish mumkin (4 foydali usul)
7. Excelda manfiy qiymatlarga ega satrlarni yashirish uchun makrosni qo'llang
Bir xil ustundan nolni o'z ichiga olgan qatorlarni yashirishingiz mumkin bo'lganidek, siz ham salbiy qiymatlarga ega satrlarni yashirishingiz mumkin . Quyida ko'rsatilgan ma'lumotlar to'plamida ustun E ham salbiy, ham ijobiy qiymatlarni o'z ichiga oladi, biz faqat salbiyni yashiradigan kodni ko'ramiz.
Qadamlar:
- Dasturchi yorlig'idan Visual Basic Editor -ni oching va Kod oynasiga Moduli kiriting.
- Kod oynasida quyidagi koddan nusxa oling va uni joylashtiring.
2680
Sizning kod endi ishga tayyor.
- Ushbu kodni ishga tushiring va 7-qator ni o'z ichiga olganiga e'tibor bering. E ustunidagi 1>manfiy qiymat (-10) endi yashirin, 82 ni olib yuruvchi 10 qator esa koʻrsatilmagan.
8. Excelda ijobiy qiymatlarni o'z ichiga olgan qatorlarni yashirish uchun VBA-ni o'rnating
Bu safar quyida berilgan ma'lumotlar to'plami bilan ustun E nol ijobiy qiymatlarni o'z ichiga oladi, biz VBA
Qadamlar:
- Ochish Visual Basic Editor Developer yorlig'idan va Insert a Module kod oynasida.
- Kod oynasida, quyidagi koddan nusxa oling va uni joylashtiring.
4422
Sizning kodingiz endi ishga tayyor.
- Ishga tushirish ushbu kod va E ustunida musbat qiymat (55) ni o'z ichiga olgan 7-qator endi yashirin, 10-qator . 0 ni tashuvchisi ko'rinmaydi.
Batafsil o'qing: Uyachaga asoslangan qatorlarni yashirish uchun VBA Exceldagi qiymat (14 ta misol)
9. Excelda toq sonli qatorlarni yashirish uchun makros
Siz toq sonli satrlarni qiymati sifatida yashirishingiz mumkin . Biz ushbu maqolaning boshida ko'rsatgan misolda, ustun E 7 va 10-qatorlarda ham toq, ham juft raqamlarni o'z ichiga oladi . Biz qatorni yashirish kodini o'rganamiz, u faqat gq sonlar .
Qadamlar:
- Dasturchi yorlig'idan Visual Basic Editor -ni oching va kod oynasida Qo'shish Moduli -ni.
- Kodda oynada quyidagi kodni nusxalang va uni joylashtiring.
2132
Kodingiz endi ishga tayyor.
- Ishga tushirish ushbu kod bo'lagini ko'ring va E ustunida toq raqamni (55) o'z ichiga olgan faqat 7-qator endi yashirin, juft sonni (82) olib yurgan 10 qator ko'rinmaydi.
10. Excelda juft raqamlarni o'z ichiga olgan qatorlarni yashirish uchun VBA
Shunga o'xshab, siz juft sonli satrlarni qiymati sifatida yashirishingiz mumkin. Biz ushbu maqolaning boshida ko'rsatgan misolda, ustun F 7 va 10-qatorlar da toq va juft sonlarni o'z ichiga oladi. Biz faqat juft sonlar o'rin olgan qatorni yashirish kodini bilib olamiz.
Qadamlar:
- Dasturchi yorlig'idan Visual Basic Editor -ni oching va kod oynasida Qo'shish Moduli -ni.
- Kodda oyna, quyidagi kodni nusxalang va uni joylashtiring.
4557
Sizning kodingiz endi ishga tayyor.
- Ishga tushirish ushbu kodni kiriting va faqat 7-qator bandida juft son (100) borligini koʻring. ustun F endi yashirin, toq raqamni (75) ko'rsatuvchi 10 qator esa yashirilgan.
Batafsil o'qing: Excel VBA: Excelda barcha qatorlarni ko'rsatish (5 ta amaliy misol)
11. Muayyan shartdan kattaroq satrlarni yashirish uchun makrosni kiriting
Siz Ma'lum bir qiymatdan kattaroq satrlarni VBA Excel yordamida yashirishingiz mumkin. Faraz qilaylik, siz ustun E dagi satrlarni yashirmoqchisiz, bu erda qiymat 80 dan katta. Buni qanday qilish kerak:
Qadamlar:
- Dasturchi yorlig'idan Visual Basic Editor ni oching va Kod oynasiga Moduli kiriting.
- Kod oynasida quyidagi kodni nusxalang va uni joylashtiring.
6926
Sizning kod endi ishga tayyor.
- Ushbu kodni ishga tushiring va faqat <10-qatorni o'z ichiga olganligini ko'ring. E ustunidagi 1>82 (80 dan katta) endi yashirin, 55 ni olib yuradigan 7-qator esa yashirin.
Batafsil o'qing: Excelda shartli formatlash yordamida hujayra qiymatiga asoslangan qatorlarni yashirish
12. Excelda ma'lum bir shartdan kamroq satrlarni qoplash uchun makrosni joylashtirish
Shuningdek, ma'lum bir qiymatdan kichik bo'lgan qatorlarni VBA Excel bilan yashirishingiz mumkin. . Faraz qilaylik, siz ustun E dagi satrlarni yashirmoqchisiz, bu erda qiymat 80 dan kichik. Buni qanday qilish kerakbu:
Qadamlar:
- Dasturchi yorlig'idan Visual Basic Editor -ni oching va Qo'shish a Module kod oynasida.
- Kod oynasida quyidagi koddan nusxa oling va uni joylashtiring.
5299
Kodingiz hozir tayyor ishga tushirish uchun.
- Ushbu kodni ishga tushiring va faqat 55
7-qator ekanligini ko'ring. E ustunidagi 2> (80 dan kam) endi yashirin, 82 ni o'z ichiga olgan 10-qator esa yashirin.
13. Makros yordamida hujayra matni qiymatiga asoslangan qatorlarni yashirish
Fazrat qilaylik, siz ma'lum bir matn qiymatiga ega bo'lgan qatorni yashirmoqchisiz. Bizning holatda, biz sizga " Kimyo ", 6-qator so'zini o'z ichiga olgan qatorga misol keltiramiz va sizga qanday qilib kodni taqdim etamiz. bu qatorni yashiring.
Qadamlar:
- Visual Basic Editor ni Tuzuvchi va <1-dan oching>Kod oynasiga Module kiriting.
- Kod oynasida quyidagi koddan nusxa oling va uni joylashtiring.
3449
Sizning kodingiz endi ishga tayyor.
Bu yerda,
- StartRow = 4 -> Birinchi qator ma'lumotlar to'plami.
- LastRow = 10 -> Ma'lumotlar to'plamining oxirgi qatori .
- iCol = 4 -> ustun manzili , bu matn qiymatiga ega.
- Ishga tushirish kodni kiriting va so'zdan iborat satr raqami 6 ekanligiga e'tibor bering