كيفية إزالة التكرارات مع الاحتفاظ بباقي قيم الصف في Excel؟
في معالجة البيانات اليومية، غالباً ما يؤدي خاصية "إزالة التكرارات" في Excel إلى حذف الصفوف بالكامل، مما قد يؤدي إلى تعطيل بيانات الأعمدة الأخرى وهيكل ورقة العمل. يقدّم هذا المقال عدة طرق لمسح القيم المكررة فقط في عمود محدد - مع الحفاظ على باقي بيانات كل صف - بما في ذلك الصيغ مع الفلاتر، ورمز VBA، وإضافة Kutools. كل حل مصحوب بحالات استخدام نموذجية ومزايا واعتبارات لمساعدتك على اختيار النهج الأنسب لاحتياجاتك بسرعة.
![]() | ![]() |
إزالة التكرارات مع الاحتفاظ بقيم الصف باستخدام الفلتر (3 خطوات)
إزالة التكرارات مع الاحتفاظ بقيم الصف باستخدام VBA (4 خطوات)
إزالة التكرارات مع الاحتفاظ بقيم الصف باستخدام Kutools لـ Excel (خطوتان)
إزالة التكرارات مع الاحتفاظ بقيم الصف باستخدام الفلتر
طريقة موثوقة للحفاظ على هيكل بياناتك أثناء مسح القيم المكررة هي دمج صيغة بسيطة مع ميزة فلتر في Excel. هذه الطريقة فعالة بشكل خاص عندما تريد تحديد التكرارات بصرياً وإزالتها بشكل انتقائي من عمود واحد، مما يضمن عدم تأثر المعلومات الأخرى في كل صف. هذه التقنية مناسبة لمجموعات البيانات صغيرة إلى متوسطة الحجم وتمنح المستخدم تحكمًا كاملاً في عملية الإزالة.
1. حدد خلية فارغة بجانب نطاق بياناتك (على سبيل المثال D2 إذا كانت بياناتك تبدأ من A2)، وأدخل الصيغة: =A3=A2. هذه الصيغة تقارن كل خلية مع الخلية التي فوقها لتمييز التكرارات. اسحب مقبض التعبئة لأسفل لتطبيق الصيغة على باقي الصفوف حسب الحاجة. راجع لقطة الشاشة:
2. بعد ذلك، حدد نطاق البيانات بالكامل - بما في ذلك العمود الذي يحتوي على الصيغة الجديدة - واضغط على بيانات > تصفية لتفعيل وظيفة التصفية. هذا يسمح لك بتصفية تلك الصفوف التي تم تمييزها كتكرارات.
3. انقر فوق أيقونة أيقونة التصفية في عمود الصيغة (على سبيل المثال، العمود D)، ومن القائمة المنسدلة حدد فقط TRUEستظهر جميع الإدخالات المكررة (عدا الحدوث الأخير).
4. بعد النقر موافقسيتم عرض جميع القيم المكررة المحددة. حدد هذه الخلايا المكررة واضغط على زر حذف لحذفها دون التأثير على الخلايا الأخرى في نفس الصفوف. سيتم الحفاظ على هيكل البيانات في الصفوف بينما تتم إزالة القيم المكررة فقط من العمود المحدد. راجع لقطة الشاشة أدناه:
نصيحة: كن حذرًا لتحديد الخلايا المكررة فقط - وليس الصف بأكمله - بحيث يتم إزالة القيم المستهدفة فقط.
5. لإعادة العرض إلى حالته الطبيعية، انقر بيانات > تصفية مرة أخرى لإلغاء تفعيل الفلتر. قم بإزالة أو مسح عمود الصيغة المساعد إذا لم تعد بحاجة إليه. الآن، تم إزالة التكرارات من العمود المحدد وبقيت جميع قيم الصف الأخرى سليمة.
المزايا: لا حاجة لاستخدام VBA أو الإضافات؛ الخطوات واضحة ويمكن تصحيح الأخطاء اليدوية بسهولة.
العيوب: ليست آلية بالكامل - يتطلب التنظيف اليدوي؛ أقل كفاءة مع مجموعات البيانات الكبيرة جدًا.
إزالة التكرارات مع الاحتفاظ بقيم الصف باستخدام VBA
يوفر VBA طريقة أكثر أتمتة لإزالة التكرارات من عمود معين، مع الحفاظ على جميع البيانات الأخرى في نفس الصفوف دون تغيير. هذه الطريقة مثالية للتعامل مع مهام التنظيف المتكررة، خاصة عند التعامل مع كميات كبيرة من البيانات أو عندما تحتاج عملية الإزالة إلى تكرار بشكل متكرر. يمكن أن يقلل استخدام VBA من الأخطاء اليدوية ويُوفر الوقت، ولكنه الأنسب للمستخدمين الذين يشعرون بالراحة مع البرمجة الأساسية في Excel.
1. اضغط على Alt + F11 لفتح نافذة محرر Microsoft Visual Basic for Applications.
2. في نافذة VBA، انتقل إلى إدراج > وحدة، ثم انسخ والصق الكود التالي في الوحدة الجديدة. يقوم هذا الكود بإزالة القيم المكررة من النطاق المحدد ولكن يحتفظ بجميع المعلومات الأخرى في الصفوف:
VBA: إزالة التكرارات مع الاحتفاظ بقيم الصف
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. ستقوم الماكرو بتنفيذ الأمر وإزالة القيم المكررة داخل النطاق المحدد، تاركة خلايا فارغة مكانها بينما يتم الاحتفاظ بجميع محتويات الصف الأخرى. وهذا يحافظ بفعالية على هيكل ورقة العمل.
المزايا: فعالة للغاية لمجموعات البيانات الكبيرة أو المتكررة؛ تقلل من العمل اليدوي.
العيوب: يتطلب تفعيل الماكرو وفهمًا أساسيًا لـ VBA؛ غالبًا لا يمكن التراجع عن التعديلات لذلك يُوصى بالعمل على نسخة احتياطية.
إزالة التكرارات مع الاحتفاظ بقيم الصف باستخدام Kutools لـ Excel
إذا كان لديك Kutools لـ Excel مثبتًا، يمكنك تبسيط عملية إزالة التكرارات من نطاق أو عمود مع الحفاظ على باقي بيانات الصف. توفر Kutools ميزات مريحة تتعامل مع البيانات المكررة بطريقة بديهية وكفؤة، وهو أمر مفيد بشكل خاص للمستخدمين الذين يحتاجون غالبًا إلى تنظيف قوائم البيانات في Excel.
بعد تثبيت Kutools لـ Excel، يمكنك استخدام أي من الطريقتين التاليتين حسب بياناتك وحسب تفضيلاتك:
الطريقة الأولى: دمج الخلايا المتشابهة (خطوتان)
1. حدد القيم المكررة التي ترغب في إزالتها. ثم انتقل إلى Kutools > دمج وتقسيم > دمج الخلايا المتشابهة. سيقوم هذا بدمج القيم المكررة المتتالية في خلية واحدة، مما يجعل من السهل مسح الكل ما عدا الحدوث الأول.
2. بعد الدمج، حدد الخلايا المدمجة، اذهب إلى الرئيسية > دمج وتوسيط > فك دمج الخلايا لإعادتها إلى خلايا قياسية. ستظهر التكرارات الآن كخلايا فارغة، وسيبقى القيمة الفريدة لكل مجموعة.
ستبدو النتيجة مشابهة للمثال أدناه، حيث تم إزالة التكرارات وبقيت قيم الصف الأخرى سليمة:
الطريقة الثانية: تحديد التكرارات والخلايا الفريدة (4 خطوات)
1. حدد القائمة الكاملة أو النطاق الذي تريد إزالة القيم المكررة منه. انقر Kutools > تحديد > تحديد التكرارات والخلايا الفريدة.
2. في تحديد التكرارات والخلايا الفريدة نافذة الحوار، اختر التكرارات (عدا الأول منها) في القاعدة القسم. سيقوم هذا بتمييز جميع حالات التكرار بعد الحدوث الأول.
3. انقر موافق. ستظهر رسالة تخبرك بعدد الخلايا المكررة التي تم تحديدها. أكد بالنقر على موافق.
4. ببساطة اضغط على زر Delete لحذف هذه القيم المكررة المحددة، تاركاً باقي بيانات الصف كما هي.
المزايا: لا حاجة لصيغ أو برمجة؛ سريع جدًا وسهل الاستخدام؛ يدعم العمليات الجماعية.
العيوب: يتطلب تثبيت إضافي.
الملخص واستكشاف الأخطاء: كل حل من الحلول أعلاه يقدم نهجًا عمليًا لإزالة القيم المكررة مع الحفاظ على باقي بيانات الصف في Excel. طرق الفلتر والصيغ مناسبة للمعالجة اليدوية الواضحة خطوة بخطوة؛ VBA ذو قيمة للتنظيف الجماعي أو المتكرر؛ وKutools توفر عمليات مريحة ومُيسرة للمستخدمين المنتظمين. تحقق دائمًا من النطاقات المحددة، اصنع نسخة احتياطية قبل العمليات الجماعية، واختر الحل الذي يتناسب مع سير عملك ومستوى راحتك مع الصيغ أو البرمجة. إذا واجهت مشاكل مثل التكرارات المفقودة أو فقدان البيانات العرضي، فراجع أعمدة المساعدة الخاصة بك للتأكد من الدقة، تحقق من الفرز، وتأكد من أن اختياراتك صحيحة قبل الحذف.
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel مع Kutools لـ Excel، واختبر الكفاءة كما لم يحدث من قبل. Kutools لـ Excel يقدم أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير
- تمكين تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint.
- افتح وأنشئ عدة مستندات في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ منفصلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات بالماوس يومياً!