كيف يمكنني إزالة جميع القيم المكررة في Excel مع الاحتفاظ بنسخة واحدة فقط من كل منها؟
يقدّم هذا البرنامج التعليمي الحيل لإزالة جميع القيم المكررة من القائمة مع الاحتفاظ بأحدها فقط في Excel، اقرأ التفاصيل:
إزالة جميع التكرارات مع الاحتفاظ بأحدها فقط باستخدام دالة إزالة التكرارات
إزالة جميع التكرارات مع الاحتفاظ بأحدها فقط باستخدام VBA
إزالة جميع التكرارات مع الاحتفاظ بأحدها فقط باستخدام Kutools لـ Excel ![]()
دمج جميع صف مكرر والاحتفاظ بالبيانات باستخدام Kutools لـ Excel ![]()
إزالة جميع التكرارات مع الاحتفاظ بأحدها فقط باستخدام دالة إزالة التكرارات
في Excel، تساعدك ميزة «إزالة التكرارات» على التخلص من جميع القيم المكررة مع الاحتفاظ بواحدة منها.
1. حدد قائمة البيانات التي تحتاجها، ثم انقر فوقالبيانات > إزالة التكرارات. راجع لقطة الشاشة:

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

3. انقر فوقموافق. وسيظهر مربع حوار يُبلغك بعدد التكرارات التي تم إزالتها؛ ما عليك سوى إغلاقه. والآن، تم الاحتفاظ بعنصر واحد فقط في القائمة بعد إزالة جميع التكرارات.

إزالة جميع التكرارات مع الاحتفاظ بأحدها فقط باستخدام VBA
إذا كنت مهتمًا بلغة VBA، فهاك كود VBA قادر على تنفيذ هذه المهمة.
1. اضغط على مفاتيحAlt+F11 في نفس الوقت لفتح نافذةمايكروسوفت فيجوال بيسك للتطبيقات.
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، يُرجى اتباع الخطوات التالية:
1. حدد نطاق البيانات، ثم انقر فوقKutools > تحديد > تحديد الخلايا المكررة/الفريدة. راجع لقطة الشاشة:

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

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

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

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


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

بعدالتثبيت المجانيKutools لـ Excel، يُرجى اتباع الخطوات التالية:
1. حدد البيانات، ثم انقر فوقKutools > دمج وتقسيم > دمج متقدم للصفوف. راجع لقطة الشاشة:

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

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

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

عرض توضيحي: دمج التكرارات مع الاحتفاظ بالبيانات المجاورة
مقالات ذات صلة:
- كيف يمكن دمج خلايا متعددة تحتوي على أصفار بادئة في خلية واحدة في Excel؟
- كيف تُنشئ رقمًا عشوائيًّا دون تكرار في Excel؟
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل