VBA yordamida Excelda dublikatlarni qanday olib tashlash mumkin (3 ta tezkor usul)

Hugh West

01-10-2023 Excel asoslari
  • Buni Baham Ko'Ring
Hugh West

Exceldagi eng muhim tadbirlardan biri berilgan ma'lumotlar to'plamidan takroriy nusxalarni olib tashlash dir. Bugun men Excelda dublikatlarni faqat VBA yordamida qanday olib tashlashni ko'rsataman.

Amaliy ish kitobini yuklab oling

VBA.xlsm yordamida Excelda dublikatlarni o'chirish

Dublikatlarni olib tashlash uchun Excelda VBA-dan foydalanishning 3 ta tezkor usullari

Bu yerda bizda Ismlar, identifikatorlar, Ballar, va baholar .

Diqqat bilan qarasangiz. , ba'zi nomlar noto'g'ri takrorlanganligini ko'rasiz.

Bugun bizning maqsadimiz Excel VBA yordamida takroriy qiymatlarni o'chirishdir.

1. Ruxsat etilgan hujayra diapazonidan dublikatlarni olib tashlash uchun VBA dan foydalaning

Avvalo, biz VBA da qattiq hujayra diapazoni yordamida takroriy nomlarni o'chirishga harakat qilamiz. kod.

Bu erda bizning ma'lumotlar to'plamimiz ish kitobidagi B3:E15 diapazonidir (shu jumladan ustun sarlavhalari ).

Biz foydalanamiz. bu yerdagi koddagi bu sobit hujayra diapazoni.

1-qadam:

➤ Yangi VBA oynasini oching va yangi modul kiriting (Bu yerni bosing ko'rish uchun Excelda yangi VBA modulini qanday ochish va kiritish).

➤ Ushbu kodni modulga kiriting:

Kod: 

3972

➤ U Remove_duplicates deb nomlangan makrosni ishlab chiqaradi. A3:E14 - bu mening ma'lumotlar to'plamim diapazoni va men 1-ustun asosida takroriy qatorlarni o'chirmoqchiman. Sizo'zingizdan foydalaning.

2-qadam:

➤ Ish varag'ingizga qayting va ushbu makroni ishga tushiring (qanday qilib ko'rish uchun shu yerni bosing. Makrosni ishga tushirish uchun).

➤ U 1-ustunda ( Talaba ismi) dublikatli satrlarni olib tashlaydi.

Batafsil o'qing: Excelda takroriy nusxalarni qanday o'chirish mumkin, lekin bittasini saqlash (7 usul)

2. Tanlangan yacheyka diapazonidan dublikatlarni olib tashlash uchun VBA kodlarini kiriting

Endi biz ishchi varaqdagi har qanday tanlangan katak diapazonidan dublikatlarni olib tashlaydigan makrosni yaratishga harakat qilamiz.

Qadam 1:

➤ Yangi VBA oynasini yana oching va boshqa yangi modulni kiriting.

➤ Ushbu kodni modulga kiriting:

Kod: 

8885

➤ U Remove_Duplicates deb nomlangan makro ishlab chiqaradi. Men 1-ustun asosidagi ikki nusxadagi qatorlarni olib tashlamoqchiman. Siz oʻz sahifangizdan foydalanasiz.

2-qadam:

➤ Ish varaqingizga qayting.

➤ Tanlang ma'lumotlar to'plamini o'rnating va ushbu makrosni ishga tushiring.

➤ U yuqoridagi kabi amalni bajaradi. 1-ustundagi ( Talaba ismi) ikki nusxadagi satrlarni olib tashlang.

Batafsil o'qing: Dublikatni qanday olib tashlash mumkin Exceldagi satrlar (3 usul)

Shunga o'xshash o'qishlar

  • Excelda ustundan dublikatlarni qanday olib tashlash mumkin (3 usul)
  • Excel VBA: massivdan dublikatlarni olib tashlash (2 ta misol)
  • Qanday qilib takroriy nusxalarni olib tashlash va Excelda birinchi qiymatni saqlash (5 usul)
  • O'chirishExcelda birinchi marta takrorlanadigan qatorlar (7 usul)
  • Excelda ikkala nusxani qanday olib tashlash mumkin (5 ta oson usul)

3. Bir nechta ustunlardan dublikatlarni olib tashlash uchun VBA makrosini joylashtiring

Hozirgacha biz 1-ustunda ( Talaba ismi ) takrorlangan satrlarni olib tashladik.

Lekin, aslida, ikki talabaning ismi bir xil bo'lishi mumkin, bu har doim ham ikkita ism bir xil bo'lsa, xato qo'shilgan degani emas.

Agar ikkita talabaning identifikatori ham bir xil bo'lsa, keyin ular bir xil talaba. Keyin qator olib tashlanishi kerak.

Bu safar ikkita satrning nomi va identifikatori bir xil bo'lsa, qatorni olib tashlaydigan makrosni ishlab chiqamiz.

1-qadam. :

➤ Yangi VBA oynasini yana oching va boshqa yangi modulni kiriting.

➤ Ushbu kodni modulga kiriting:

Kod: 

5630

➤ U Remove_Duplicates deb nomlangan makrosni ishlab chiqaradi. Men 1 va 2-ustun (Ism va identifikator) asosidagi takroriy qatorlarni olib tashlamoqchiman. Siz oʻz sahifangizdan foydalanasiz.

2-qadam:

➤ Ish varagʻingizga qayting.

➤ Tanlang ma'lumotlar to'plamini o'rnating va ushbu makrosni ishga tushiring.

➤ Bu safar u ism va talaba identifikatori bir xil bo'lsagina qatorlarni olib tashlaydi.

Izoh: Bu erda Jennifer Marlo olib tashlanmadi, chunki ikki talabaning identifikatorlari har xil, ya'ni ular ikki xil talaba.

Batafsil o'qing: Excel VBA: Bir nechta ustunlarni solishtirganda dublikatlarni olib tashlash (3 ta misol)

Xulosa

Ushbu usullardan foydalanib, siz ikki nusxadagi nusxalarni olib tashlashingiz mumkin. VBA yordamida Excelda ma'lumotlar to'plami. Sizda muammolar bormi? Bizdan bemalol so'rang.

Oldingi xabar Excel IFERROR funktsiyasi 0 o'rniga bo'sh joyni qaytaradi
Keyingi post Excelda taqqoslash jadvalini qanday tuzish mumkin (4 samarali usul)

Hugh West - bu sohada 10 yildan ortiq tajribaga ega bo'lgan yuqori tajribali Excel treneri va tahlilchisi. Buxgalteriya hisobi va moliya yo‘nalishi bo‘yicha bakalavr va biznes boshqaruvi bo‘yicha magistr darajasiga ega. Xyu o'qitishga ishtiyoqi bor va unga amal qilish va tushunish oson bo'lgan o'ziga xos o'qitish usulini ishlab chiqdi. Uning Excel bo'yicha ekspert bilimlari butun dunyo bo'ylab minglab talabalar va mutaxassislarga o'z malakalarini oshirishga va o'z martabalarida muvaffaqiyat qozonishlariga yordam berdi. Xyu o'z blogi orqali o'z bilimlarini dunyo bilan baham ko'radi, jismoniy shaxslar va korxonalarga o'z salohiyatini to'liq ro'yobga chiqarishga yordam berish uchun bepul Excel darsliklari va onlayn treninglarni taklif qiladi.