یکی از مهمترین فعالیت ها در اکسل حذف موارد تکراری از یک مجموعه داده معین است. امروز نحوه حذف موارد تکراری در اکسل فقط با استفاده از VBA را نشان خواهم داد.

دانلود کتاب تمرین تمرین

3 روش سریع برای استفاده از VBA در اکسل برای حذف موارد تکراری

در اینجا مجموعه داده ای با نام ها، شناسه ها،<داریم. 2> نمرات، و نمرات در امتحان برخی از دانش آموزان مدرسه ای به نام مهد کودک آفتابگردان.

اگر با دقت نگاه کنید ، خواهید دید که برخی از نام ها به اشتباه تکرار شده اند.

امروزه هدف ما حذف مقادیر تکراری با استفاده از Excel VBA است.

1. از VBA برای حذف موارد تکراری از محدوده سلول ثابت استفاده کنید

اول از همه، ما سعی خواهیم کرد نام های تکراری را حذف کنیم با استفاده از یک محدوده سلول ثابت در VBA کد.

در اینجا، مجموعه داده ما محدوده B3:E15 در کتاب کار (شامل سرصفحه ستون ) است.

ما استفاده خواهیم کرد این محدوده سلول ثابت در کد اینجاست.

مرحله 1:

➤ یک پنجره VBA جدید باز کنید و یک ماژول جدید وارد کنید (اینجا را کلیک کنید برای دیدن نحوه باز کردن و درج یک ماژول VBA جدید در اکسل).

➤ این کد را در ماژول وارد کنید:

Code:

9980

➤ یک ماکرو به نام Remove_Duplicates تولید می کند. A3:E14 محدوده مجموعه داده های من است، و من می خواهم ردیف های تکراری را بر اساس ستون 1 حذف کنم . شمااز یکی خود استفاده کنید.

مرحله 2:

➤ به کاربرگ خود برگردید و این ماکرو را اجرا کنید (اینجا را کلیک کنید تا ببینید چگونه برای اجرای ماکرو).

➤ ردیف‌های تکراری در ستون 1 ( نام دانش‌آموز) را حذف می‌کند.

بیشتر بخوانید: چگونه موارد تکراری را در اکسل حذف کنیم اما یکی را حفظ کنیم (7 روش)

2. کدهای VBA را برای حذف موارد تکراری از محدوده سلولی انتخاب شده وارد کنید

اکنون سعی می کنیم یک ماکرو بسازیم که بتواند موارد تکراری را از هر محدوده سلولی انتخاب شده در کاربرگ حذف کند.

مرحله 1:

➤ دوباره یک پنجره VBA جدید باز کنید و ماژول جدید دیگری را وارد کنید.

➤ این کد را در ماژول وارد کنید:

کد:

9509

➤ یک ماکرو به نام Remove_Duplicates تولید می کند. من می خواهم ردیف های تکراری را بر اساس ستون 1 حذف کنم. شما از یکی از خود استفاده می کنید.

مرحله 2:

➤ به کاربرگ خود بازگردید.

➤ انتخاب کنید داده های خود را تنظیم کرده و این ماکرو را اجرا کنید.

➤ همان کاری را که در بالا انجام داد اجرا می کند. ردیف های دارای تکرار در ستون 1 ( نام دانش آموز) را حذف کنید.

بیشتر بخوانید: چگونه موارد تکراری را حذف کنیم ردیف ها در اکسل (3 روش)

خواندنی های مشابه

• نحوه حذف موارد تکراری از ستون در اکسل (3 روش)
• Excel VBA: حذف موارد تکراری از یک آرایه (2 مثال)
• نحوه حذف موارد تکراری و حفظ اولین مقدار در اکسل (5 روش)
• حذف کنیدردیف های تکراری به جز اولین اتفاق در اکسل (7 روش)
• چگونه هر دو تکراری را در اکسل حذف کنیم (5 روش آسان)

3. جاسازی یک ماکرو VBA برای حذف موارد تکراری از چندین ستون

تاکنون ما ردیف هایی را که دارای موارد تکراری در ستون 1 هستند حذف کرده ایم ( نام دانش آموز ).

اما در واقع، نام دو دانش آموز می تواند یکسان باشد، همیشه به این معنی نیست که اگر دو نام یکسان باشد، به اشتباه اضافه شده است.

اما اگر شناسه دو دانش آموز هم یکی باشد، پس آنها همان دانش آموز هستند. سپس ردیف باید حذف شود.

این بار ما یک ماکرو ایجاد می کنیم که اگر نام و شناسه دو سطر یکسان باشد، ردیف را حذف می کند.

مرحله 1 :

➤ دوباره یک پنجره VBA جدید باز کنید و ماژول جدید دیگری را وارد کنید.

➤ این کد را در ماژول وارد کنید:

کد:

1723

➤ یک ماکرو به نام Remove_Duplicates تولید می کند. من می خواهم ردیف های تکراری را بر اساس ستون 1 و 2 (نام و شناسه) حذف کنم. شما از یکی از خود استفاده می کنید.

مرحله 2:

➤ به کاربرگ خود بازگردید.

➤ انتخاب کنید داده‌های خود را تنظیم کرده و این ماکرو را اجرا کنید.

➤ این بار فقط در صورتی که نام و شناسه دانشجو یکسان باشند، ردیف‌ها را حذف می‌کند.

توجه: در اینجا جنیفر مارلو را حذف نکرده است زیرا شناسنامه دو دانش آموز متفاوت است، یعنی آنها دو دانش آموز متفاوت هستند. 3>

بیشتر بخوانید: Excel VBA: حذف موارد تکراری با مقایسه چندین ستون (3 مثال)

نتیجه گیری

با استفاده از این روش ها، می توانید موارد تکراری را از یک مجموعه داده ها در اکسل با استفاده از VBA. آیا مشکلی دارید؟ از ما بپرسید.