كيفية عرض تحذير إذا تم إدخال قيمة مكررة في عمود Excel؟
في العديد من السيناريوهات الواقعية، تعتبر سلامة البيانات ودقتها أمرًا أساسيًا في مصنفات Excel. على سبيل المثال، عند تسجيل أرقام الموظفين أو الأرقام التسلسلية للمنتجات أو أرقام الطلاب، قد يؤدي أي إدخال مكرر إلى حدوث لبس أو أخطاء لاحقة. لمنع ذلك، قد ترغب في تنبيه المستخدمين تلقائيًا برسالة تحذير منبثقة كلما حاولوا إدخال قيمة مكررة في عمود أو نطاق معين، كما هو موضح في لقطة الشاشة أدناه. يساعد هذا النهج المستخدمين على الحفاظ على قوائم نظيفة ومميزة ويقلل من خطر الإدخال العرضي المكرر.
تحذير إذا تم إدخال بيانات مكررة باستخدام التحقق من صحة البيانات
تحذير إذا تم إدخال بيانات مكررة باستخدام Kutools for Excel
تحذير إذا تم إدخال بيانات مكررة باستخدام كود VBA (حدث تغيير ورقة العمل)
تحذير إذا تم إدخال بيانات مكررة باستخدام التحقق من صحة البيانات
في Excel، يمكنك استخدام ميزة التحقق من صحة البيانات مع صيغة مخصصة لمنع الإدخالات المكررة في نطاق - وهذا مفيد في الحالات التي تتطلب أكوادًا أو معرفات أو أسماء فريدة. بمجرد التكوين، يقوم Excel بتحذير المستخدم وإيقاف الإدخال المكرر على الفور، مما يضمن أن تظل كل قيمة داخل النطاق المحدد فريدة. يمنع هذا الفحص اليدوي ويبسط مهام إدخال البيانات الكبيرة.
لإعداد هذا، اتبع الخطوات التالية:
1. حدد نطاقًا حيث تريد منع التكرارات، على سبيل المثال، A1:A10. ثم انتقل إلى بيانات التبويب وانقر فوق التحقق من صحة البيانات > التحقق من صحة البيانات. انظر لقطة الشاشة:
2. في التحقق من صحة البيانات مربع الحوار، انتقل إلى إعدادات التبويب. ضبط السماح إلى مخصص في القائمة المنسدلة. في الصيغة المربع، أدخل الصيغة التالية:
=COUNTIF($A$1:$A$10,A1)=1
تتأكد هذه الصيغة من أن القيمة التي يتم إدخالها تظهر مرة واحدة فقط في النطاق المحدد. انظر لقطة الشاشة:
شرح المعاملات:
$A$1:$A$10 يحدد النطاق الذي تريد فيه منع التكرارات، و A1 يشير إلى الخلية الأولى من النطاق. قم بتعديل هذه المراجع وفقًا لنطاقك الفعلي.
احتياطات: استخدم دائمًا المراجع المطلقة ($
) للنطاق بحيث يتم تطبيق التحقق بشكل صحيح على جميع الخلايا المحددة.
3. بعد ذلك، انتقل إلى تنبيه الخطأ التبويب. تأكد من أن عرض تنبيه الخطأ بعد إدخال بيانات غير صالحة تم تحديده. ضبط نمط إلى توقف (الافتراضي)، وحدد عنوان التنبيه والرسالة المفضلة لديك. هذه الرسالة هي ما يراه المستخدمون إذا حاولوا إدخال قيمة مكررة. انظر لقطة الشاشة:
نصيحة: الرسائل الواضحة والموجزة (مثل “إدخال مكرر غير مسموح به!”) تساعد المستخدمين على فهم المشكلة بسرعة عند محاولة إدخال قيمة مكررة.
4. انقر فوق موافق لتطبيق إعداداتك. الآن، عندما يحاول المستخدمون إدخال قيمة متكررة في أي مكان ضمن النطاق المحدد (هنا، A1:A10)، سيقوم Excel بعرض مربع حوار تحذير. لن يتم قبول أي قيمة مكررة.
نصيحة: إذا كنت تفضل إعلام المستخدمين بالتكرارات ولكن لا تزال تسمح بهذه الإدخالات (للتتبع أو التحقيق)، في التحقق من صحة البيانات مربع الحوار تنبيه الخطأ التبويب، حدد تحذير من نمط القائمة المنسدلة بدلاً من توقف. يسمح هذا بالتكرارات ولكنه يضع عليها علامة بتنبيه.
عندما يقوم المستخدم بإدخال قيمة مكررة، سيتم عرض مربع حوار تحذير، ويمكن للمستخدم اختيار نعم أو إلغاء للحفاظ على التكرار، أو لا لإزالة التكرار.
السيناريوهات المطبقة: هذه الطريقة مناسبة عندما تحتاج إلى فرض أو مراقبة قواعد إدخال البيانات على نطاق واحد، وتفضل نهجًا بدون كتابة البرامج باستخدام الميزات المدمجة. المزايا: لا حاجة لإضافات أو ماكرو؛ يدعم كل من منع التكرارات وإظهار التنبيهات. العيوب: يتطلب تحديث التحقق إذا تغير حجم النطاق؛ يعمل فقط أثناء الإدخال اليدوي، وليس للقيم المتعددة الملصقة أو الصيغ.
تحذير إذا تم إدخال بيانات مكررة باستخدام Kutools for Excel
بالنسبة للمستخدمين الذين يريدون نهجًا أكثر سلاسة دون الحاجة إلى حفظ الصيغ، يقدم Kutools لـ Excel حلًا سهل الاستخدام باستخدام أداة منع التكرار. تبسيط هذه الأداة عملية الإعداد والإدارة، خاصة عند التعامل مع نطاقات بيانات كبيرة أو الحاجة إلى خيارات متقدمة لمنع التكرار.
بعد تثبيت Kutools لـ Excel، اتبع الخطوات التالية لتمكين مربع الحوار التحذيري للتكرارات:(تنزيل مجاني Kutools لـ Excel الآن!)
حدد النطاق (مثل العمود أو منطقة البيانات) حيث تريد تشغيل تحذير عند حدوث تكرارات. ثم انتقل إلى Kutools > منع الكتابة > منع التكرار. انظر لقطة الشاشة:
اتبع التعليمات: انقر نعم للتأكيد، ثم موافق لتطبيق المنع. سترى مربعات حوار تأكيد ترشدك خلال هذه الخطوات.
![]() |
![]() |
مع تمكين هذه الأداة المساعدة، سيتم عرض مربع حوار تحذير منبثق فور إدخال قيمة مكررة داخل النطاق المحدد. سيتم حجب الإدخال لمنع التكرار. انظر لقطة الشاشة:
يقدم Kutools تعديلات دقيقة إضافية: يمكنك منع أحرف محددة (مثل @، #، $، %) بإدخالها في منع الكتابة في هذه الأحرف المربع، أو السماح فقط بأحرف معينة عبر السماح بكتابة هذه الأحرف الإعداد. هذا مفيد لضمان جودة البيانات المتقدمة بما يتجاوز التكرارات.
السيناريوهات المطبقة: هذا الحل مناسب للمستخدمين الذين يفضلون نهجًا كفوءًا يعتمد على الواجهة ويتطلب إعدادات متكررة عبر نطاقات أو مصنفات مختلفة. المزايا: سهل، لا يتطلب حفظ الصيغ، يدعم قواعد إدخال أكثر تعقيدًا وقيود الأحرف. العيوب: يتطلب تثبيت Kutools لـ Excel.
Kutools لـ Excel - قم بتعزيز Excel بأكثر من 300 أدوات أساسية. استمتع بميزات ذكاء اصطناعي مجانية بشكل دائم! احصل عليه الآن
عرض تجريبي: تحذير إذا تم إدخال بيانات مكررة باستخدام Kutools لـ Excel
تحذير إذا تم إدخال بيانات مكررة باستخدام كود VBA (تغيير حدث ورقة العمل)
بالنسبة لأولئك الذين يشعرون بالراحة مع الماكرو ويحتاجون إلى طريقة ديناميكية وبرمجية لتحذير المستخدمين بشأن الإدخالات المكررة في عمود، يمكنك استخدام كود حدث VBA. من خلال تنفيذ حدث Worksheet Change، سيقوم Excel بمراقبة العمود المخصص وإظهار مربع رسالة تحذير مخصص على الفور عند اكتشاف إدخال مكرر. تقدم هذه الطريقة مرونة عالية وهي مفيدة بشكل خاص لسير العمل المخصصة، أو عندما تريد تحديد سلوكيات فريدة عند وجود تكرارات.
السيناريوهات المطبقة: هذا النهج مثالي عندما:
- تريد رسالة منبثقة مخصصة بالكامل (أبعد من مطالبات Excel المدمجة)
- تعمل في بيئة حيث يتم السماح بتشغيل ماكرو VBA وتفعيلها
- تريد تطبيق هذا على نطاقات أكبر أو تتغير ديناميكيًا دون إعادة ضبط إعدادات التحقق باستمرار
المزايا: منطق وأدوات تعليمية قابلة للتخصيص للغاية؛ يمكن تكييفها لقواعد التحقق المعقدة.
العيوب: يتطلب تمكين الماكرو وبعض المهارات الأساسية في VBA؛ يجب وضع روتين الحدث في ورقة العمل منطقة الكود (وليست وحدة قياسية)، وستعمل فقط على الورقة حيث تم تثبيت الكود.
خطوات التشغيل:
1. انقر بزر الماوس الأيمن على علامة تبويب الورقة حيث تريد مراقبة التكرارات وحدد عرض الكود.
2. في المحرر، الصق الكود VBA التالي في نافذة كود ورقة العمل (وليس في وحدة):
Private Sub Worksheet_Change(ByVal Target As Range)
Dim cell As Range
Dim checkRange As Range
Dim duplicateFound As Boolean
Dim colRange As String
colRange = "A:A" ' Set to the column you want to monitor (e.g., entire column A)
Set checkRange = Intersect(Me.Range(colRange), Target)
If checkRange Is Nothing Then Exit Sub
Application.EnableEvents = False
For Each cell In checkRange
If WorksheetFunction.CountIf(Me.Range(colRange), cell.Value) > 1 And cell.Value <> "" Then
MsgBox "Duplicate entry detected: '" & cell.Value & "' already exists in " & colRange, vbExclamation, "KutoolsforExcel"
cell.ClearContents
End If
Next cell
Application.EnableEvents = True
End Sub
3. أغلق محرر VBA وعد إلى ورقة عملك. حاول إدخال قيمة في العمود المراقب (هنا، العمود A). إذا كانت القيمة موجودة بالفعل في مكان آخر في العمود، سترى تحذيرًا منبثقًا وسيتم مسح الإدخال المكرر تلقائيًا.
نصائح حول المعلمات:
- colRange يتحكم في العمود الذي سيتم التحقق فيه للتكرارات (الافتراضي: A:A لكل العمود A). يمكنك تعديل هذا إلى نطاق محدد مثل "A1:A10" إذا كان ذلك مفضلًا.
نصائح لاستكشاف الأخطاء وإصلاحها: إذا لم يعمل الماكرو، تأكد من تمكين الماكرو وأن الكود في وحدة ورقة العمل المناسبة (وليست في وحدة VBA قياسية). استخدم Alt + F11 للوصول إلى المحرر، وانقر نقرًا مزدوجًا على اسم الورقة ذات الصلة تحت "Microsoft Excel Objects" في مشروعك.
نصيحة عملية: إذا كنت تريد سلوكًا مختلفًا، مثل السماح بالتكرار ولكن فقط تحذير، يمكنك تعديل cell.ClearContents
إلى ظهور رسالة بسيطة فقط.
باختصار، كل من هذه الحلول في Excel تقدم مزايا فريدة لإدارة منع التكرار:
- التحقق من صحة البيانات - مثالي للإعدادات المباشرة بدون كتابة برامج مع تنبيهات واضحة للنطاقات المحددة.
- Kutools لـ Excel - الأنسب للمستخدمين الذين يريدون إعدادًا سريعًا ومرونة، وقيود إدخال متقدمة دون كتابة الصيغ أو VBA.
- حدث تغيير ورقة العمل VBA - مناسب لمتطلبات ديناميكية أو متقدمة أو عندما تكون هناك حاجة إلى رسائل / إجراءات مخصصة.
تذكر حفظ مصنفك كمصنف Excel تمكين الماكرو (.xlsm) عند استخدام حل VBA بحيث يبقى الكود دائمًا متاحًا في المصنف.
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في 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 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد