Mundarija
Ma'lumotlar bilan kurashish , mezonlar asosida bir varaqdan ikkinchisiga o'tish Excelda tez-tez bajariladigan vazifalardan biridir. Agar sizda juda ko'p qatorlar bo'lsa va ularni ba'zi bir mezonlarga asoslanib boshqa varaqqa ko'chirmoqchi bo'lsangiz, bu juda charchagan va vaqt talab qilishi mumkin. Ammo Microsoft Visual Basic Application (VBA) yordamida siz turli mezonlar asosida ma'lumotlarni bir varaqdan boshqasiga osongina nusxalashingiz mumkin bo'lgan makroslarni yaratishingiz mumkin. Ushbu maqolada men sizga qanday qilib Excel VBA yordamida 2 xil mezonga asoslangan qatorlarni boshqa ish varag'iga ko'chirishingiz mumkinligini ko'rsataman.
Aytaylik, " Ma'lumotlar " nomli ish varag'ida sizda quyidagi ma'lumotlar to'plami mavjud bo'lib, unda turli sotuvchilarning savdo va sotuv sohalari berilgan. Endi siz boshqa varaqdagi ba'zi mezonlarga asoslangan qatorlarni nusxalashni xohlaysiz.
Amaliy kitobni yuklab oling
Qatorlarni boshqasiga nusxalash Criteria.xlsm asosidagi ishchi varaq
Excel VBA mezonlari asosida satrlarni boshqa ishchi varaqga nusxalashning 2 usuli
1. Matn mezonlari asosida satrlarni boshqa ishchi varaqga nusxalash
Ushbu namoyishda men sizga matn mezonlari asosida bir varaqdan boshqasiga satrlarni qanday ko'chirishingizni ko'rsataman. Aytaylik, siz Virjiniya da sotuvchi sotuvchilarning ma'lumotlarini Excel VBA yordamida Savatlar hududi nomli ish varag'iga ko'chirmoqchisiz. Buning uchun, avvalo,
➤ ALT+F11 tugmalarini bosib VBA oynasini oching.
VBA ichida oyna,
➤ Qo'shish yorlig'ini bosing va Module -ni tanlang.
Bu shunday bo'ladi Module(Kod) oynasini oching. Endi,
➤ Module(Kod) oynasiga quyidagi kodni kiriting,
3045
Kod Criteria_Matnni nusxalash nomli makro yaratadi. Joriy ishchi varaqning C ustunida Virjiniyani qidiring va Savatlar maydoni (Sheet3) deb nomlangan ish varag'ida Virjiniyani o'z ichiga olgan qatorlarni qaytaring.
Shundan so'ng,
➤ VBA oynasini yoping yoki minimallashtiring.
➤ ALT+F8
tugmalarini bosing. U Makro oynasini ochadi.
➤ Makro nomi bo'limida Kriteria_Matnni nusxalash -ni tanlang va Ishga tushirish tugmasini bosing.
Natijada, Virjiniya bilan qatorlar Savatlar maydoni
Batafsil o'qing: Excelda qatorlarni avtomatik ravishda boshqa varaqqa ko'chirish (4 usul)
2. Raqam mezonlari asosida qatorlarni boshqa ishchi varaqga nusxalash
Endi , Men sizga raqam mezonlari asosida bir ishchi varaqdan boshqa ish varag'iga satrlarni qanday ko'chirishingiz mumkinligini ko'rsataman. Aytaylik, siz $100000 dan ortiq savdo ma'lumotlarini Eng ko'p sotuvlar deb nomlangan ish varag'iga ko'chirmoqchisiz. Buning uchun, avvalo,
➤ ALT+F11 tugmalarini bosib VBA oynasini oching.
VBA ichida oyna,
➤ Qo'shish yorlig'ini bosing va Module -ni tanlang.
U
➤ Module(Kod) oynasiga quyidagi kodni kiriting,
2836
Kod Kriteriyalar_raqamini nusxalash nomli makro yaratadi. Ma'lumotlar nomli ishchi varaqning D ustunida 100000 dan katta qiymatlarni qidiring va Eng ko'p sotuvlar ( Sheet4).
Shundan so'ng,
➤ VBA oynasini yoping yoki minimallashtiring.
➤
U Makro oynasini ochadi.
➤ Makro nomidan Kriteriyalar_raqamini nusxalash ni tanlang. 2>qutisini bosing va Ishga tushirish -ni bosing.
Natijada $100000 dan ortiq savdo qiymatlarini o'z ichiga olgan qatorlar <4-ga ko'chiriladi>Eng ko'p sotilgan ish varag'i.
Batafsil o'qing: Excelda makro yordamida bir nechta qatorlarni qanday nusxalash mumkin (4 ta misol)
Xulosa
Ushbu maqolaning ikkita usuli yordamida siz Excel VBA-dan foydalanib, turli mezonlar asosida bir ish varag'idan boshqa ish varag'iga qatorlarni ko'chirishingiz mumkin bo'ladi. Matn mezonlari uchun birinchi usuldan, raqam mezonlari uchun ikkinchi usuldan foydalanishingiz mumkin. Agar sizda biron bir usul haqida chalkashlik bo'lsa, iltimos, sharh qoldiring.
