كيف يمكن إزالة القيم المكررة مع الاحتفاظ ببقية بيانات الصف في Excel؟
في معالجة البيانات اليومية، غالبًا ما تؤدي ميزة Excel «إزالة التكرارات» إلى حذف الصف بأكمله، مما قد يُربك بيانات الأعمدة الأخرى ويخلّ بهيكل ورقة العمل ككل. يقدم هذا المقال عدة طرق لحذف القيم المكررة في عمود معيّن فقط—مع الحفاظ على باقي بيانات كل صف—بما في ذلك استخدام الصيغ مع التصفية، ورمز VBA، وإضافة Kutools. ويرافق كل حل حالات استخدام نموذجية ومزايا واعتبارات تساعدك على اختيار الطريقة الأنسب لاحتياجاتك بسرعة.
 |  |
إزالة التكرارات مع الحفاظ على باقي قيم الصف باستخدام التصفية (3 خطوات)
إزالة التكرارات مع الحفاظ على باقي قيم الصف باستخدام VBA (4 خطوات)
إزالة التكرارات مع الحفاظ على باقي قيم الصف باستخدام Kutools لـ Excel (خطوتان)
إزالة التكرارات مع الحفاظ على باقي قيم الصف باستخدام التصفية
طريقة موثوقة للحفاظ على هيكل بياناتك أثناء إزالة القيم المكررة هي الجمع بين صيغة بسيطة وميزة التصفية في Excel. وتُعدّ هذه الطريقة فعّالة بشكل خاص عندما تريد تحديد العناصر المكررة بصريًّا وإزالة التكرارات انتقائيًّا من عمود واحد، مع ضمان عدم تأثر باقي المعلومات في كل صف. وهي مثالية لمجموعات البيانات الصغيرة والمتوسطة، وتوفر لك تحكمًا كاملاً في عملية الإزالة.
1. حدد خلية فارغة مجاورة لنطاق البيانات (على سبيل المثال، D2 إذا كانت بياناتك تبدأ من A2)، ثم أدخل الصيغة التالية: =A3=A2. تُقارن هذه الصيغة كل خلية بالخلية التي تعلوها لتحديد العناصر المكررة. اسحب مقبض التعبئة لأسفل لتطبيق الصيغة على باقي الصفوف حسب الحاجة. راجع لقطة الشاشة التالية:
2. بعد ذلك، حدد نطاق البيانات بالكامل—بما في ذلك عمود الصيغة الجديد—ثم انقر علىبيانات > تصفيةلتفعيل وظيفة التصفية. بهذه الطريقة، يمكنك بسهولة تصفية الصفوف المُعلَّمة كعناصر مكررة.
3. انقر علىأيقونة التصفيةفي عمود الصيغة (مثل العمود D)، ثم من القائمة المنسدلة اختر فقطصواب (TRUE). سيتم عرض جميع الإدخالات المكررة (ما عدا آخر تكرار).
4. بعد النقر علىموافق (OK)، ستظهر جميع القيم المكررة المحددة. قم بتحديد خلايا التكرار هذه واضغط على مفتاححذف (Delete)لمسحها دون التأثير على الخلايا الأخرى في صفوفها. وهكذا يبقى هيكل بيانات الصف سليمًا مع إزالة القيم المكررة فقط من العمود المحدد. راجع لقطة الشاشة أدناه:
تلميح:كن حذرًا عند تحديد خلايا التكرار فقط—وليس الصف بأكمله—حتى تتم إزالة القيم المستهدفة فقط.
5. لإعادة العرض إلى حالته الطبيعية، انقر علىبيانات > تصفيةمرة أخرى لتعطيل التصفية. وإذا لم تعد بحاجة إلى عمود الصيغة المساعد، فقم بإزالته أو مسحه. الآن، لم يعد هناك أي عناصر مكررة في العمود المحدد، وظلت جميع القيم الأخرى في الصفوف سليمة تمامًا.
المزايا:لا حاجة لاستخدام VBA أو الإضافات؛ الخطوات واضحة ويمكنك تصحيح الأخطاء يدويًّا بسهولة.
العيوب:ليست آلية بالكامل—تتطلب تنظيفًا يدويًّا؛ وأقل كفاءة مع مجموعات البيانات الكبيرة جدًّا.
إزالة التكرارات مع الحفاظ على باقي قيم الصف باستخدام VBA
يوفر VBA وسيلة أكثر أتمتة لإزالة العناصر المكررة من عمود، مع الحفاظ على جميع البيانات الأخرى في نفس الصفوف دون أي تغيير. وتُعد هذه الطريقة مثالية للتعامل مع مهام التنظيف المتكررة، خاصةً عند العمل مع كميات كبيرة من البيانات أو عند الحاجة إلى تطبيق إجراء الإزالة بشكل متكرر. ويمكن لاستخدام VBA أن يقلل من الأخطاء اليدوية ويوفّر الوقت، لكنه يناسب أكثر المستخدمين المعتادين على البرمجة الأساسية في Excel.
1. اضغط علىAlt + F11 لفتح نافذة محررMicrosoft Visual Basic for Applications.
2. في نافذة VBA، انتقل إلىإدراج (Insert) > وحدة نمطية (Module)، ثم انسخ والصق الكود التالي في الوحدة الجديدة. يقوم هذا الكود بإزالة القيم المكررة من النطاق المحدد مع الحفاظ على جميع المعلومات الأخرى في الصفوف:
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 أو انقر على زرتشغيل (Run). بعد ذلك، سيظهر مربع حوار يطلب منك تحديد النطاق الذي تريد إزالة القيم المكررة منه. ثم انقر علىموافق (OK)للتأكيد.
4. سيُنفَّذ الماكرو لإزالة القيم المكررة ضمن نطاق محدود، تاركًا خلايا فارغة مكانها مع الحفاظ على جميع محتويات الصفوف الأخرى—مما يحافظ فعليًّا على هيكل ورقة العمل الخاصة بك.
المزايا:فعّالة جدًّا مع مجموعات البيانات الكبيرة أو المتكررة، وتقلل من الجهد اليدوي بشكل كبير.
العيوب:تتطلب تمكين ماكرو وفهمًا أساسيًّا لـ VBA؛ وغالبًا ما تكون التعديلات غير قابلة للتراجع، لذا يُوصى بشدة بالعمل على نسخة احتياطية.
إزالة التكرارات مع الحفاظ على باقي قيم الصف باستخدام Kutools لـ Excel
إذا كان لديكKutools لـ Excelمثبّتًا، يمكنك تبسيط عملية إزالة العناصر المكررة من نطاق أو عمود مع الحفاظ على باقي بيانات الصف. توفّر Kutools ميزات مريحة تعالج البيانات المكررة بشكل بديهي وفعال—وهو أمرٌ مثالي خصوصًا للمستخدمين الذين يحتاجون غالبًا إلى تنظيف قوائم البيانات في Excel!
بعد تثبيتKutools لـ Excel، يمكنك استخدام إحدى الطريقتين التاليتين حسب بياناتك وتفضيلاتك:
الطريقة الأولى: دمج الخلايا المتشابهة (خطوتان)
1. حدد القيم المكررة التي ترغب في إزالة التكرار منها. بعد ذلك، انتقل إلىKutools > دمج وتقسيم > دمج الخلايا المتشابهة. سيؤدي ذلك إلى دمج القيم المكررة المتتالية في خلية واحدة، مما يسهّل مسح جميع التكرارات ما عدا أول تكرار.
2. بعد الدمج، حدد الخلايا المدمجة، ثم انتقل إلىالصفحة الرئيسية > دمج وتوسيط > فك الدمجلإعادتها إلى خلايا قياسية. ستظهر العناصر المكررة الآن كخلايا فارغة، مع بقاء القيمة الفريدة الوحيدة لكل مجموعة.
ستبدو النتيجة مشابهة للمثال أدناه، حيث تمت إزالة العناصر المكررة مع الحفاظ على باقي قيم الصف:
الطريقة الثانية: تحديد الخلايا المكررة/الفريدة (4 خطوات)
1. حدد القائمة أو النطاق بأكمله الذي تريد إزالة القيم المكررة منه. انقر علىKutools > تحديد > تحديد الخلايا المكررة/الفريدة.
2. في مربع حوارتحديد الخلايا المكررة/الفريدة، اخترالعناصر المكررة (ما عدا الأول)في قسمالقاعدة. سيؤدي ذلك إلى تمييز جميع حالات التكرار بعد أول تكرار.
3. انقر علىموافق (OK). سيظهر تنبيه يُخبرك بعدد خلايا التكرار التي تم تحديدها. أكد بالنقر علىموافق (OK)مرة أخرى.
4. اضغط ببساطة على مفتاححذف (Delete)لإزالة القيم المكررة المحددة، مع الحفاظ على باقي بيانات الصف دون تغيير.
المزايا:لا تحتاج إلى صيغ أو برمجة؛ سريعة جدًّا وسهلة الاستخدام؛ وتدعم العمليات الجماعية.
العيوب:تتطلب تثبيتًا إضافيًّا.
الملخص واستكشاف الأخطاء وإصلاحها:كل حل من الحلول المذكورة أعلاه يقدّم نهجًا عمليًّا لإزالة القيم المكررة مع الحفاظ على سلامة باقي بيانات صفوفك في Excel. تعدّ طرق التصفية والصيغ مثالية للمعالجة اليدوية الشفافة خطوة بخطوة، بينما يُعدّ VBA خيارًا مثاليًا للتنظيف الجماعي أو المتكرر، وتوفّر أدوات Kutools عمليات مبسّطة ومريحة للمستخدمين المنتظمين. تأكد دائمًا من تحديد النطاق الصحيح، واحفظ نسخة احتياطية قبل تنفيذ العمليات الجماعية، واختر الحل الأنسب لسير عملك ومستوى راحتك مع الصيغ أو البرمجة. إذا واجهت مشكلات مثل تجاوز عناصر مكررة أو فقدان بيانات عن غير قصد، فراجع أعمدة المساعدة للتأكد من دقتها، وتحقق من الفرز، وتأكد من صحة تحديداتك قبل الحذف.
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل