Skip to main content

Kutools for Office — مجموعة واحدة. خمسة أدوات. أنجز المزيد.

كيفية إزالة جميع القيم المكررة مع الاحتفاظ بواحدة فقط في Excel؟

Author Sun Last modified

يقدم هذا البرنامج التعليمي الحيل لإزالة جميع القيم المكررة من قائمة مع الاحتفاظ بواحدة فقط في Excel، اقرأ التفاصيل:

إزالة جميع القيم المكررة مع الاحتفاظ بواحدة فقط باستخدام وظيفة إزالة التكرارات

إزالة جميع القيم المكررة مع الاحتفاظ بواحدة فقط باستخدام VBA

إزالة جميع القيم المكررة مع الاحتفاظ بواحدة فقط باستخدام Kutools لـ Excel good idea3

دمج جميع الصفوف المكررة والاحتفاظ بالبيانات باستخدام Kutools لـ Excel good idea3


إزالة جميع القيم المكررة مع الاحتفاظ بواحدة فقط باستخدام وظيفة إزالة التكرارات

في Excel، يمكن أن تساعدك ميزة إزالة التكرارات على إزالة كل شيء باستثناء قيمة واحدة مكررة.

1. حدد قائمة البيانات التي تحتاجها، ثم انقر فوق البيانات > إزالة التكرارات. انظر لقطة الشاشة:

Remove Duplicates button on the Data tab on the ribbon

2. بعد ذلك، في مربع حوار إزالة التكرارات، قم بتحديد اسم العمود الذي تريد إزالة التكرارات منه، وإذا كانت بياناتك تحتوي على رؤوس، فتأكد أيضًا من تحديد البيانات تحتوي على رؤوس. انظر لقطة الشاشة:

Remove Duplicates dialog

3. انقر فوق موافق. ستظهر نافذة منبثقة تخبرك بعدد التكرارات التي تم إزالتها، فقط أغلقها. الآن تم إزالة جميع التكرارات باستثناء واحد في القائمة.

Success dialog


إزالة جميع القيم المكررة مع الاحتفاظ بواحدة فقط باستخدام VBA

إذا كنت مهتمًا بـ VBA، هنا يمكنني أيضًا تقديم كود VBA لحل هذه المهمة.

1. اضغط على مفتاح Alt+F11 معًا لفتح نافذة Microsoft Visual Basic for Applications.

2. انقر فوق إدراج > وحدة، والصق الكود التالي VBA في نافذة الوحدة الجديدة.

VBA: إزالة جميع القيم المكررة مع الاحتفاظ بواحدة.

Sub RemoveAllDeplicateButOne()
    Dim LR As Long: LR = Range("A" & Rows.Count).End(xlUp).Row
    ActiveSheet.Range("A1:A" & LR).RemoveDuplicates Columns:=1, Header:=Name
End Sub

3. اضغط على مفتاح F5 أو انقر فوق تشغيل لتنفيذ الكود VBA، وسيتم إزالة التكرارات في القائمة الموجودة في العمود A مع الاحتفاظ بواحدة.

نصيحة: في الكود VBA أعلاه، يشير A إلى العمود A، وA1: A يشير إلى نطاق القائمة، يمكنك تغييرها حسب الحاجة.


إزالة جميع القيم المكررة مع الاحتفاظ بواحدة فقط باستخدام Kutools لـ Excel

يوجد أداة قوية في Kutools لـ Excel تُسمى تحديد الخلايا المكررة والفريدة والتي يمكنها بسرعة اختيار أو تمييز جميع التكرارات باستثناء الأول، وبعد ذلك يمكنك إزالتها.

Kutools لـ Excel يقدم أكثر من 300 ميزة متقدمة لتبسيط المهام المعقدة، مما يعزز الإبداع والكفاءة. بالتكامل مع قدرات الذكاء الاصطناعي، يقوم Kutools بأتمتة المهام بدقة، مما يجعل إدارة البيانات أمرًا سهلاً للغاية. معلومات تفصيلية عن Kutools لـ Excel... نسخة تجريبية مجانية...

بعد تثبيت Kutools لـ Excel مجانًا ، يرجى القيام بما يلي:

1. حدد نطاق البيانات وانقر فوق Kutools > تحديد > تحديد الخلايا المكررة والفريدة. انظر لقطة الشاشة:

Select Duplicate & Unique Cells option on the Kutools tab on the ribbon

2. في النافذة المنبثقة، حدد خيار القيم المكررة (باستثناء التطابق الأول)، ثم انقر فوق موافق. انظر لقطة الشاشة:

Select Duplicate & Unique Cells dialog

3. ستظهر نافذة منبثقة لتذكيرك بعدد الخلايا المحددة. فقط انقر فوق موافق لإغلاقها. انظر لقطة الشاشة:

Success dialog

4. سيتم تحديد جميع التكرارات باستثناء الأول، اضغط على مفتاح الحذف لمسحها.

All the duplicates but first one are selected

نصيحة: يمكنك أيضًا إزالة جميع التكرارات مع الاحتفاظ بواحدة باستخدام تحديد الخلايا المكررة والفريدة كما يلي:

حدد جميع القيم الفريدة بما في ذلك التكرارات الأولى، ثم انسخها عن طريق الضغط على Ctrl + C والصقها في موقع آخر باستخدام Ctrl + V.

Select Duplicate & Unique Cells dialog with All unique option checked9

عرض: إزالة جميع التكرارات مع الاحتفاظ بواحدة فقط

Kutools لـ Excel: أكثر من 300 أدوات عملية في متناول يدك! استمتع بميزات ذكاء اصطناعي مجانية بشكل دائم! قم بالتنزيل الآن!

دمج جميع الصفوف المكررة والاحتفاظ بالبيانات باستخدام Kutools لـ Excel

إذا كان لديك بعض البيانات، وما تريده هو دمج الصفوف المكررة ثم الاحتفاظ بالبيانات المقابلة كما هو موضح في لقطة الشاشة أدناه، يمكنك استخدام وظيفة دمج متقدم للصفوف في Kutools لـ Excel.

Illustration of combining duplicate rows and keep the corresponding data

بعد تثبيت Kutools لـ Excel مجانًا ، يرجى القيام بما يلي:

1. حدد البيانات وانقر فوق Kutools > دمج وتقسيم > دمج متقدم للصفوف. انظر لقطة الشاشة:

Advanced Combine Rows option on the Kutools tab on the ribbon

2. في مربع الحوار دمج الصفوف بناءً على عمود، حدد العمود الذي تريد إزالة التكرارات منه وانقر فوق المفتاح الرئيسي لجعله كعمود المفتاح الرئيسي. انظر لقطة الشاشة:

Combine Rows Based on Column dialog with Primary Key button highlighted

3. بعد ذلك، حدد العمود الذي تريد الاحتفاظ بالبيانات فيه، ثم انقر فوق دمج، واختر فاصلًا من القائمة. انظر لقطة الشاشة:

Combine Rows Based on Column dialog with Combine button highlighted

4. انقر فوق موافق، وستتم دمج الصفوف المكررة والاحتفاظ بالبيانات المقابلة.

Duplicate rows are combined and the corresponding data are kept

عرض: دمج التكرارات مع الاحتفاظ بالبيانات المجاورة

Kutools لـ Excel: أكثر من 300 أدوات عملية في متناول يدك! استمتع بميزات ذكاء اصطناعي مجانية بشكل دائم! قم بالتنزيل الآن!

مقالات ذات صلة:

أفضل أدوات الإنتاجية لمكتب العمل

🤖 Kutools AI Aide: أحدث ثورة في تحليل البيانات اعتمادًا على: التنفيذ الذكي |  توليد الأكواد |  إنشاء الصيغ المخصصة |  تحليل البيانات وتوليد الرسوم البيانية |  استخدام Kutools Functions...
ميزات شائعة: البحث، تمييز أو وضع علامة على المكررات | حذف الصفوف الفارغة | دمج الأعمدة أو الخلايا بدون فقدان البيانات | تقريب بدون الصيغة...
بحث متقدم: بحث بمعايير متعددة VLookup | بحث بقيم متعددة VLookup | بحث في عدة ورقات VLookup | مطابقة غامضة...
قائمة منسدلة متقدمة: إنشاء قائمة منسدلة بسرعة | قائمة منسدلة معتمدة | قائمة منسدلة متعددة الاختيارات...
مدير الأعمدة: إضافة عدد محدد من الأعمدة | نقل الأعمدة | تبديل حالة إظهار الأعمدة المخفية | مقارنة النطاقات والأعمدة...
ميزات مميزة: التركيز على الشبكة | عرض التصميم | شريط الصيغ المحسن | مدير أدوات المصنف وورقة العمل | مكتبة النص التلقائي | منتقي التاريخ | دمج البيانات | تشفير/فك تشفير الخلايا | إرسال البريد الإلكتروني حسب الجدول | مرشح متقدم | تصفية خاصة (تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...)...
أفضل15 مجموعة أدوات:12 أداة نصية (إضافة نص، حذف الأحرف المحددة، ...) | أكثر من50 نوع رسم بياني (مخطط جانت، ...) | أكثر من40 صيغة عملية (حساب العمر بناءً على تاريخ الميلاد، ...) |19 أداة إدراج (إدراج رمز الاستجابة السريعة، إدراج صورة من المسار، ...) |12 أداة تحويل (تحويل إلى كلمات، تحويل العملة، ...) |7 أدوات دمج وتقسيم (دمج متقدم للصفوف، تقسيم الخلايا، ...) | ... والمزيد
استخدم Kutools بلغتك المفضلة – يدعم الإنجليزية، الإسبانية، الألمانية، الفرنسية، الصينية، وأكثر من40 لغة أخرى!

عزز مهاراتك في Excel باستخدام Kutools لـ Excel، واختبر كفاءة غير مسبوقة. Kutools لـ Excel يوفر أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة الأكثر أهمية بالنسبة لك...


Office Tab يجلب واجهة التبويب إلى Office ويجعل عملك أسهل بكثير

  • تفعيل تحرير وقراءة عبر التبويبات في Word، Excel، PowerPoint، Publisher، Access، Visio وProject.
  • افتح وأنشئ عدة مستندات في تبويبات جديدة في نفس النافذة، بدلاً من نوافذ مستقلة.
  • يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات اليومية من الفأرة!

جميع إضافات Kutools. مثبت واحد

حزمة Kutools for Office تجمع بين إضافات Excel وWord وOutlook وPowerPoint إضافة إلى Office Tab Pro، وهي مثالية للفرق التي تعمل عبر تطبيقات Office.

Excel Word Outlook Tabs PowerPoint
  • حزمة الكل في واحد — إضافات Excel وWord وOutlook وPowerPoint + Office Tab Pro
  • مثبّت واحد، ترخيص واحد — إعداد في دقائق (جاهز لـ MSI)
  • الأداء الأفضل معًا — إنتاجية مُبسطة عبر تطبيقات Office
  • تجربة كاملة لمدة30 يومًا — بدون تسجيل، بدون بطاقة ائتمان
  • قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد