Note: The other languages of the website are Google-translated. Back to English

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

في Excel ، ستزيل جميع القيم المكررة وتتحرك لأعلى عند تطبيق وظيفة إزالة التكرارات كما هو موضح في لقطة الشاشة 1. ومع ذلك ، في بعض الحالات ، قد ترغب في إزالة التكرارات مع الاحتفاظ ببقية قيم الصف كما هو موضح في لقطة الشاشة 2. الآن ، في هذه الحالة ، سأقدم بعض الحيل حول حذف التكرارات مع الاحتفاظ بالباقي في Excel.

doc إزالة التكرارات والحفاظ على الباقي 1 doc إزالة التكرارات والحفاظ على الباقي 2

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

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

قم بإزالة التكرارات مع الاحتفاظ بباقي قيم الصف باستخدام Kutools for Excel (خطوتان)فكرة جيدة 3


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

باستخدام الصيغة ووظيفة التصفية ، يمكنك إزالة التكرارات بسرعة مع الاحتفاظ بالراحة.

1. حدد خلية فارغة بجوار نطاق البيانات ، D2 على سبيل المثال ، اكتب الصيغة = A3 = A2، اسحب مقبض التعبئة التلقائية لأسفل إلى الخلايا التي تحتاجها. انظر لقطة الشاشة:
doc إزالة التكرارات والحفاظ على الباقي 3

2. حدد كل نطاق البيانات بما في ذلك خلية الصيغة ، وانقر البيانات > تصفية لتمكين تصفية وظيفة. انظر لقطة الشاشة:
doc إزالة التكرارات والحفاظ على الباقي 4

3. انقر على في رمز التصفية في العمود D (عمود الصيغة) ، وتحقق TURE من القائمة المنسدلة ، انظر الصورة:
doc إزالة التكرارات والحفاظ على الباقي 5

4. انقر OK، وبعد ذلك تم إدراج جميع التكرارات ، وحدد جميع القيم المكررة ، اضغط على حذف مفتاح لإزالتها. انظر لقطة الشاشة:
doc إزالة التكرارات والحفاظ على الباقي 6

5. انقر البيانات > تصفية تعطيل تصفية، وقم بإزالة الصيغ حسب حاجتك. يمكنك رؤية جميع التكرارات قد تمت إزالتها ويتم الاحتفاظ ببقية القيم في الصف.
doc إزالة التكرارات والحفاظ على الباقي 7


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

في Excel ، يوجد رمز VBA يمكنه أيضًا إزالة التكرارات مع الاحتفاظ ببقية قيم الصف.

1. صحافة ALT + F11 مفاتيح للعرض ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. انقر إدراج > مجمع نموذجيهـ ، والصق الكود أدناه في ملف وحدة.

فبا: إزالة التكرارات مع الاحتفاظ بقيم الصفوف المتبقية

Sub RemoveDuplicates()
'UpdatebyExtendoffice20160918

    Dim xRow As Long
    Dim xCol As Long
    Dim xrg As Range
    Dim xl As Long
    On Error Resume Next
    Set xrg = Application.InputBox("Select a range:", "Kutools for Excel", _
                                    ActiveWindow.RangeSelection.AddressLocal, , , , , 8)

    xRow = xrg.Rows.Count + xrg.Row - 1
    xCol = xrg.Column
    'MsgBox xRow & ":" & xCol
    Application.ScreenUpdating = False
    For xl = xRow To 2 Step -1
        If Cells(xl, xCol) = Cells(xl - 1, xCol) Then
            Cells(xl, xCol) = ""
        End If
    Next xl
    Application.ScreenUpdating = True
    
End Sub

doc إزالة التكرارات والحفاظ على الباقي 8

3. صحافة F5 مفتاح لتشغيل الرمز ، يظهر مربع حوار لتذكيرك بتحديد نطاق لإزالة القيم المكررة منه. انظر لقطة الشاشة:
doc إزالة التكرارات والحفاظ على الباقي 9

4. انقر OK، الآن تمت إزالة القيم المكررة من التحديد وترك خلايا فارغة.
doc إزالة التكرارات والحفاظ على الباقي 10


قم بإزالة التكرارات مع الاحتفاظ بباقي قيم الصف باستخدام Kutools for Excel

إذا كان لديك كوتولس ل إكسسل - أداة مفيدة وقوية مثبتة ، يمكنك إزالة التكرارات بسرعة مع الاحتفاظ بقيم الراحة أو الصف من خلال طريقتين.

كوتولس ل إكسيل, مع أكثر من 300 وظائف يدوية ، تجعل مهامك أكثر سهولة. 

بعد تثبيت Kutools for Excel ، يرجى القيام بما يلي :(قم بتنزيل Kutools for Excel الآن!)

الطريقة الأولى: دمج نفس الخلايا (خطوتان)

1. حدد القيم المكررة ، انقر فوق كوتولس > دمج وتقسيم > دمج نفس الخلايا. انظر لقطة الشاشة:
doc إزالة التكرارات والحفاظ على الباقي 11

2. ثم تم دمج القيم المكررة في خلية واحدة. وانقر فوق الرئيسية > دمج وتوسيط > فك دمج الخلايا لتقسيمها. انظر لقطة الشاشة:
doc إزالة التكرارات والحفاظ على الباقي 12

الآن تم عرض النتيجة على النحو التالي:
doc إزالة التكرارات والحفاظ على الباقي 13

الطريقة الثانية حدد الخلايا المكررة والفريدة (2 خطوات)

1. حدد قائمة البيانات التي تريد إزالة التكرارات منها ، وانقر فوق كوتولس > اختار > حدد الخلايا الفريدة والمكررة. انظر لقطة الشاشة:
doc إزالة التكرارات والحفاظ على الباقي 14

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

3. انقر Ok، يظهر مربع حوار لتذكيرك بعدد التكرارات التي تم تحديدها ، انقر فوق OK لإغلاقه. انظر لقطة الشاشة:
doc إزالة التكرارات والحفاظ على الباقي 16

4. ثم اضغط حذف مفتاح لإزالة القيم المكررة المحددة.

doc إزالة التكرارات والحفاظ على الباقي 17

تلميح: دوامة كوتولس ل إكسيلالصورة الجمع بين الصفوف المتقدمة الأداة المساعدة ، يمكنك دمج القيم المكررة ثم إجراء بعض العمليات الحسابية في عمود آخر كما هو موضح أدناه لقطة الشاشة. إنها تعمل بكامل طاقتها دون قيود 30 أيام،يرجى التنزيل والحصول على نسخة تجريبية مجانية الآن.
doc إزالة التكرارات والحفاظ على الباقي 18


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

Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪

  • إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
  • سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
  • دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
  • حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
  • نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
  • استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
  • سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
  • اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
  • أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.
علامة تبويب kte 201905

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

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
أوفيسيتاب القاع
فرز التعليقات حسب
التعليقات (14)
لا يوجد تقييم. كن أول من يقيم!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرًا لك على هذا البرنامج التعليمي ، فهو يوفر لي الكثير من العمل لإزالة التكرارات.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
في الطريقة الأولى ، بدلاً من = A3 = A2 ، يمكنك فعل = A2 = A1 للاحتفاظ بالمثيل الأول وحذف باقي التكرارات.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا لك على هذا التعليق! بالضبط ما كنت أبحث عنه!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
نعم إنه يعمل
تم تصغير هذا التعليق بواسطة المشرف على الموقع
هل من الممكن دمج الخلايا المتشابهة بدون الوظيفة الإضافية Kutools؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
هلو ، مو ، قد تساعدك هذه المقالة. https://www.extendoffice.com/documents/excel/4864-excel-combine-rows-with-same-id-name.html
تم تصغير هذا التعليق بواسطة المشرف على الموقع
إن حل الصواب / الخطأ هو خدعة ذكية. شكرًا
تم تصغير هذا التعليق بواسطة المشرف على الموقع
الكاذبة الحقيقية ساعدت حقا!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
سأستخدم الصيغة = A3 <> A2 (لا تساوي) بحيث تظهر في الأعلى مقابل الأخيرة في الأسفل.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
لقد جربت الصيغة = A1 = A2 ، كما أنها تحصل على نفس نتيجة الظهور في الأعلى
تم تصغير هذا التعليق بواسطة المشرف على الموقع
لقد جربت الصيغة = A2 = A1 ، كما حصلت على نتيجة الظهور في الأعلى.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا جزيلا لك! كان هذا مفيدًا جدًا !!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
ساعدني بعد بحث طويل شكرا اخي
تم تصغير هذا التعليق بواسطة المشرف على الموقع
المعلومات مفيدة للغاية ، ووفرت الكثير من الوقت

شكر.
لا توجد تعليقات منشورة هنا حتى الآن
اترك تعليقاتك
النشر كضيف
×
قيم المنشور:
0   الشخصيات
المواقع المقترحة

تواصل معنا

حقوق التأليف والنشر © 2009 - شبكة الاتصالات العالمية.extendoffice.com. | كل الحقوق محفوظة. مشغل بواسطة ExtendOffice. | | خريطة الموقع
Microsoft وشعار Office هما علامتان تجاريتان أو علامتان تجاريتان مسجلتان لشركة Microsoft Corporation في الولايات المتحدة و / أو دول أخرى.
محمي بواسطة Sectigo SSL