Skip to main content

كيفية البحث عن القيم واستبدالها بأكبر من / أقل من قيمة محددة في Excel؟

Author: Xiaoyang Last Modified: 2025-07-21

عند العمل مع مجموعات بيانات كبيرة في Excel، غالبًا ما تحتاج إلى تحديد واستبدال الخلايا التي تلبي معايير محددة، مثل القيم الأكبر من أو الأقل من حد معين. على سبيل المثال، قد تحتاج إلى استبدال جميع الأرقام التي تزيد عن 500 بـ 0، أو استبدال أي قيم تقل عن معيار الأداء برسالة تحذير. على عكس أداة البحث والاستبدال القياسية - التي تجد فقط نصوصًا أو أرقامًا متطابقة أو جزئية - فإن الاستبدالات المشروطة بناءً على مقارنة رقمية تتطلب نهجًا بديلًا. يقدم هذا البرنامج التعليمي عدة طرق عملية للتعامل مع هذه السيناريوهات بفعالية، مما يساعدك على توفير الوقت وتقليل الأخطاء اليدوية.

البحث عن القيم واستبدالها بأكبر من / أقل من قيمة محددة باستخدام كود VBA

البحث عن القيم واستبدالها بأكبر من / أقل من قيمة محددة باستخدام Kutools لـ Excel

صيغة Excel - استخدام دالة IF في عمود مساعد لاستبدال القيم الأكبر أو الأقل من حد معين

طرق Excel المدمجة الأخرى - التصفية/الترتيب والاستبدال


البحث عن القيم واستبدالها بأكبر من / أقل من قيمة محددة باستخدام كود VBA

على سبيل المثال، تخيل أنك تريد بسرعة تحديد كل قيمة في مجموعة البيانات الخاصة بك التي تكون أكبر من 500 وتغييرها جميعًا إلى 0 في عملية واحدة. هذه حاجة شائعة في تعديلات التقديرات، وضع علامات على نتائج الامتثال، أو تنظيف البيانات. باستخدام VBA، يمكنك أتمتة العملية بأكملها وتجنب التعديلات اليدوية المتكررة.

sample data

توفر الحلول التالية باستخدام VBA إمكانية استبدال جميع قيم الخلايا الأكبر أو الأقل من رقم محدد مرة واحدة. يمكنك تخصيص قيمة المقارنة والاستبدال حسب الحاجة لحالتك:

1. اضغط مع الاستمرار على مفتاحي ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.

2. انقر فوق إدراج > وحدة، والصق الكود التالي في نافذة الوحدة.

كود VBA: البحث عن القيم واستبدالها بأكبر أو أقل من قيمة محددة

Sub FindReplace()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    If Rng.Value > 500 Then
        Rng.Value = 0
    End If
Next
End Sub

3. ثم اضغط على مفتاح F5 لتشغيل هذا الكود. عند المطالبة، حدد نطاق البيانات الذي تريد البحث فيه واستبدال القيم. (تحديد البيانات ذات الصلة فقط يساعد في تجنب الاستبدالات غير المقصودة في الخلايا غير ذات الصلة).

vba code to select data range

4. انقر فوق موافق في مربع الحوار. سيقوم الكود تلقائيًا بفحص النطاق المحدد واستبدال جميع القيم الأكبر من 500 بـ 0 (أو كما هو محدد خلاف ذلك).

all the values greater than a specific value are replaced with0

ملاحظات ونصائح:

  • يمكنك ضبط الحدود وقيمة الاستبدال عن طريق تعديل هذه الأسطر في الكود:
    إذا كانت Rng.Value >500 إذن
    Rng.Value =0
  • هذا الكود يقوم بتغيير الأرقام فقط. إذا كانت بياناتك تتضمن خلايا فارغة أو إدخالات غير رقمية، فستبقى هذه دون تغيير.
  • قبل تشغيل VBA، يُفضل حفظ نسخة احتياطية من ملفك في حال أردت التراجع عن التغييرات.
  • إذا ظهرت رسالة أمان الماكرو، تأكد من تمكين الماكرو لهذا المصنف.

البحث عن القيم واستبدالها بأكبر من / أقل من قيمة محددة باستخدام Kutools لـ Excel

إذا لم تكن لديك خبرة في VBA أو البرمجة، فإن Kutools لـ Excel توفر طريقة رسومية للتعامل مع هذه المشكلة. يتيح لك أداة Select Specific Cells تحديد جميع الخلايا التي تطابق شروطك واستبدال محتوياتها دفعة واحدة، مما يقلل من الأخطاء البشرية ويُسرّع عملية تنظيف البيانات.

Kutools لـ Excel يقدم أكثر من 300 ميزة متقدمة لتبسيط المهام المعقدة، مما يعزز الإبداع والكفاءة. بالتكامل مع قدرات الذكاء الاصطناعي، يقوم Kutools بأتمتة المهام بدقة، مما يجعل إدارة البيانات أمرًا سهلاً للغاية. معلومات تفصيلية عن Kutools لـ Excel... نسخة تجريبية مجانية...

بعد تثبيت Kutools لـ Excel، اتبع الخطوات التالية:

1. حدد نطاق البيانات الذي تريد معالجته.

2. انتقل إلى Kutools > تحديد > Select Specific Cells لفتح مربع حوار Select Specific Cells.

click Select Specific Cells feature of kutools

3. في مربع حوار Select Specific Cells:

  1. حدد Cell لنوع التحديد.
  2. اختر أكبر من (أو أقل من، حسب الحاجة) من النوع المحدد.
  3. أدخل قيمة العتبة في الحقل المجاور (على سبيل المثال، 500).

set criteria in the dialog box

4. انقر فوق موافق. سيتم تسليط الضوء على جميع الخلايا التي تطابق معاييرك دفعة واحدة. الآن، اكتب قيمة الاستبدال المطلوبة واضغط معًا على Ctrl + Enter؛ سيتم تحديث كل قيمة محددة على الفور.

original data arrow right the values greater than a specific value are replaced with0

نصائح إضافية:

  • يمكنك استخدام معايير أخرى مثل أقل من، يساوي، أو يحتوي على حسب احتياجاتك.
  • لتجنب الاستبدالات العرضية، تحقق من تحديدك قبل الضغط على Ctrl + Enter.

قم بتنزيل وإصدار تجريبي مجاني من Kutools لـ Excel الآن!


صيغة Excel - استخدام دالة IF في عمود مساعد لاستبدال القيم الأكبر أو الأقل من حد معين

تستخدم هذه الطريقة دالة IF المدمجة في Excel لإنشاء عمود مساعد، مما يجعل من السهل التحقق بصريًا ومن ثم تطبيق الاستبدالات القائمة على الشروط. هذا مفيد بشكل خاص إذا كنت تريد المزيد من الشفافية قبل الكتابة فوق بياناتك الأصلية، أو إذا كنت بحاجة إلى طريقة غير مدمرة لاختبار كيف ستبدو النتائج. يمكنك أيضًا تخصيص منطق الاستبدال لسيناريوهات مختلفة مثل الإبلاغ، التصنيف، أو تحديد القيم المتطرفة.

1. أدخل عمودًا جديدًا بجانب بياناتك (على سبيل المثال، إذا كانت بياناتك في العمود A، أدخل عمودًا جديدًا B).

2. في الخلية الأولى من العمود المساعد (على سبيل المثال، B2)، أدخل الصيغة التالية لاستبدال جميع القيم التي تزيد عن 500 بـ 0:

=IF(A2>500,0,A2)

إذا كنت تريد استبدال القيم الأقل من حد معين (مثل أقل من 200)، استخدم:

=IF(A2<200,0,A2)

يمكنك استبدال 500 أو 200 و 0 بأي حد وقيمة استبدال لتلبية احتياجاتك. يجب تعديل المرجع A2 بناءً على نطاق البيانات الفعلي الخاص بك.

3. اضغط على Enter بعد كتابة الصيغة. ثم انسخ الصيغة إلى باقي العمود المساعد (اسحب مقبض التعبئة لأسفل أو انقر نقرًا مزدوجًا على المقبض).

4. بمجرد تأكيد أن العمود المساعد ينتج النتيجة التي تريدها، حدد وانسخ البيانات الجديدة، ثم انقر بزر الماوس الأيمن على نطاق البيانات الأصلي واختر لصق خاص > القيم للكتابة فوق البيانات الأصلية بالنتائج المحسوبة.

نصائح واحتياطات:

  • تسهل صيغ العمود المساعد رؤية ومراجعة التغييرات قبل استبدال البيانات الأصلية، مما يقلل من المخاطر.
  • كن حذرًا مع مراجع الخلايا إذا كنت تطبق الصيغ على نطاقات غير متصلة - تأكد من المحاذاة الصحيحة.
  • تحافظ هذه الطريقة على بياناتك الأصلية حتى تنتهي من المراجعة وقرر الكتابة فوقها.
  • إذا كان لديك مجموعات بيانات كبيرة، فقد يكون استخدام الصيغ أبطأ من VBA أو Kutools، ولكنه أكثر أمانًا لمراجعة تغييرات البيانات.

طرق Excel المدمجة الأخرى - التصفية والاستبدال

يمكن أن تساعدك التصفية على اختيار جميع القيم البصرية التي تكون أكبر أو أقل من متطلباتك المحددة، بحيث يمكنك بعد ذلك استبدال جميع الخلايا ذات الصلة بسرعة باستخدام تحرير Excel القياسي. هذه الطريقة مرنة ولا تتطلب صيغًا أو كودًا، مما يجعلها مناسبة لأولئك الذين يفضلون العمل مباشرة مع واجهة Excel للمهام الفردية أو البصرية.

1. حدد نطاق بياناتك وقم بتمكين التصفية بالنقر فوق البيانات > تصفية.

2. انقر فوق السهم القابل للسحب في العمود الذي تريد تقييمه. اختر فلاتر الأرقام > أكبر من (أو أقل من)، ثم أدخل قيمة العتبة (على سبيل المثال، 500).

3. سيعرض Excel فقط الصفوف التي تطابق معايير التصفية الخاصة بك. حدد جميع الخلايا المرشحة المرئية في العمود الخاص بك.

4. اكتب قيمة الاستبدال (مثل 0) واضغط على Ctrl + Enter - سيقوم Excel بالكتابة فوق الخلايا المرئية (المصفاة) فقط.

5. أوقف تشغيل الفلتر لرؤية وفحص مجموعة البيانات النهائية الخاصة بك.

نصائح، مزايا وعيوب:

  • التصفية والاستبدال أمر مباشر ومثالي لمجموعات البيانات المعتدلة حيث تريد تأكيدًا بصريًا للخلايا التي يتم تغييرها.
  • بالنسبة للأعمدة التي تحتوي على صيغ، قد يؤدي هذا الأسلوب إلى الكتابة فوق وكسر الصيغ؛ استخدمه بحذر.
  • إذا قمت عن طريق الخطأ بتحديد النطاق الخاطئ وأجريت تغييرات، اضغط على Ctrl + Z للتراجع، ثم قم بتعديل تحديدك أو معايير الفلتر وحاول مرة أخرى.

مقالات ذات صلة:

كيفية البحث عن التطابقات الدقيقة واستبدالها في Excel؟

كيفية استبدال النصوص بالصور المقابلة في Excel؟

كيفية البحث عن استبدال لون التعبئة في Excel؟


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

🤖 Kutools AI Aide: أحدث ثورة في تحليل البيانات من خلال: التنفيذ الذكي |توليد الشيفرة |إنشاء الصيغ المخصصة |تحليل البيانات وتوليد الرسوم البيانية |استدعاء الوظائف المحسنة
الميزات الشائعة: البحث، تمييز أو وضع علامة على المكررات | حذف الصفوف الفارغة | دمج الأعمدة أو العنوان دون فقدان البيانات | تقريب ...
بحث متقدم: بحث V متعدد المعايير | بحث V متعدد القيم | بحث في عدة ورقات | مطابقة غامضة ....
قائمة منسدلة متقدمة: إنشاء قائمة منسدلة بسرعة | قائمة منسدلة تابعة | قائمة منسدلة متعددة الاختيار ....
إدارة الأعمدة: إضافة عدد محدد من الأعمدة | نقل الأعمدة | تبديل حالة إظهار الأعمدة المخفية | مقارنة النطاق والأعمدة ...
ميزات مميزة: التركيز على الشبكة | عرض التصميم | شريط الصيغ المحسن | أدوات المصنف & أدوات الورقة العمل | مكتبة النص التلقائي (Auto Text) | منتقي التاريخ | دمج البيانات | تشفير/فك تشفير الخلايا | إرسال البريد الإلكتروني حسب القائمة | مرشح متقدم | تصفية خاصة (تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...) ...
أفضل15 مجموعة أدوات:12 أداة نصية (إضافة نص، حذف الأحرف المحددة، ...) | أكثر من50 نوع من الرسوم البيانية (مخطط جانت، ...) | أكثر من40 صيغة عملية (حساب العمر بناءً على تاريخ الميلاد، ...) |19 أداة إدراج (إدراج رمز الاستجابة السريعة، إدراج صورة من المسار، ...) |12 أداة تحويل (تحويل إلى كلمات، تحويل العملة، ...) |7 أدوات دمج وتقسيم (دمج متقدم للصفوف، تقسيم الخلايا، ...) | ... والمزيد

عزز مهاراتك في Excel مع Kutools لـ Excel، واختبر الكفاءة كما لم يحدث من قبل. Kutools لـ Excel يقدم أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...


Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير

  • تمكين تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint.
  • افتح وأنشئ عدة مستندات في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ منفصلة.
  • يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات بالماوس يومياً!