كيفية إزالة التكرارات مع الاحتفاظ بقيم الصفوف في Excel؟
في Excel ، ستزيل جميع القيم المكررة وتتحرك لأعلى عند تطبيق وظيفة إزالة التكرارات كما هو موضح في لقطة الشاشة 1. ومع ذلك ، في بعض الحالات ، قد ترغب في إزالة التكرارات مع الاحتفاظ ببقية قيم الصف كما هو موضح في لقطة الشاشة 2. الآن ، في هذه الحالة ، سأقدم بعض الحيل حول حذف التكرارات مع الاحتفاظ بالباقي في Excel.
إزالة التكرارات مع الاحتفاظ بقيم الصفوف المتبقية باستخدام عامل التصفية (3 خطوات)
قم بإزالة التكرارات مع الاحتفاظ بقيم الصفوف المتبقية باستخدام VBA (4 خطوات)
قم بإزالة التكرارات مع الاحتفاظ بباقي قيم الصف باستخدام Kutools for Excel (خطوتان)
قم بإزالة التكرارات مع الاحتفاظ بباقي قيم الصف باستخدام عامل التصفية
باستخدام الصيغة ووظيفة التصفية ، يمكنك إزالة التكرارات بسرعة مع الاحتفاظ بالراحة.
1. حدد خلية فارغة بجوار نطاق البيانات ، D2 على سبيل المثال ، اكتب الصيغة = A3 = A2، اسحب مقبض التعبئة التلقائية لأسفل إلى الخلايا التي تحتاجها. انظر لقطة الشاشة:
2. حدد كل نطاق البيانات بما في ذلك خلية الصيغة ، وانقر البيانات > منقي لتمكين منقي وظيفة. انظر لقطة الشاشة:
3. انقر على في رمز التصفية في العمود D (عمود الصيغة) ، وتحقق TURE من القائمة المنسدلة ، انظر الصورة:
4. انقر OK، وبعد ذلك تم إدراج جميع التكرارات ، وحدد جميع القيم المكررة ، اضغط على حذف مفتاح لإزالتها. انظر لقطة الشاشة:
5. انقر البيانات > منقي تعطيل منقي، وقم بإزالة الصيغ حسب حاجتك. يمكنك رؤية جميع التكرارات قد تمت إزالتها ويتم الاحتفاظ ببقية القيم في الصف.
قم بإزالة التكرارات مع الاحتفاظ بقيم الصفوف المتبقية باستخدام 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
3. صحافة F5 مفتاح لتشغيل الرمز ، يظهر مربع حوار لتذكيرك بتحديد نطاق لإزالة القيم المكررة منه. انظر لقطة الشاشة:
4. انقر OK، الآن تمت إزالة القيم المكررة من التحديد وترك خلايا فارغة.
قم بإزالة التكرارات مع الاحتفاظ بباقي قيم الصف باستخدام Kutools for Excel
إذا كان لديك كوتولس ل إكسسل - أداة مفيدة وقوية مثبتة ، يمكنك إزالة التكرارات بسرعة مع الاحتفاظ بقيم الراحة أو الصف من خلال طريقتين.
كوتولس ل إكسيل, مع أكثر من 300 وظائف يدوية ، تجعل مهامك أكثر سهولة. |
بعد تثبيت Kutools for Excel ، يرجى القيام بما يلي :(قم بتنزيل Kutools for Excel الآن!)
الطريقة الأولى: دمج نفس الخلايا (خطوتان)
1. حدد القيم المكررة ، انقر فوق كوتولس > دمج وتقسيم > دمج نفس الخلايا. انظر لقطة الشاشة:
2. ثم تم دمج القيم المكررة في خلية واحدة. وانقر فوق الصفحة الرئيسية > دمج وتوسيط > فك دمج الخلايا لتقسيمها. انظر لقطة الشاشة:
الآن تم عرض النتيجة على النحو التالي:
الطريقة الثانية حدد الخلايا المكررة والفريدة (2 خطوات)
1. حدد قائمة البيانات التي تريد إزالة التكرارات منها ، وانقر فوق كوتولس > أختار > حدد الخلايا الفريدة والمكررة. انظر لقطة الشاشة:
2. في ال حدد الخلايا الفريدة والمكررة الحوار ، تحقق التكرارات (باستثناء واحد) الخيار في قاعدة الجزء. انظر لقطة الشاشة:
3. انقر Ok، يظهر مربع حوار لتذكيرك بعدد التكرارات التي تم تحديدها ، انقر فوق OK لإغلاقه. انظر لقطة الشاشة:
4. ثم اضغط حذف مفتاح لإزالة القيم المكررة المحددة.
قم بإزالة التكرارات ولكن احتفظ بباقي الصف
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!