Skip to main content

كيفية جعل خانة الاختيار محددة بناءً على قيمة الخلية في Excel؟

Author: Siluvia Last Modified: 2025-08-06

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

اجعل خانة الاختيار محددة بناءً على قيمة الخلية باستخدام صيغة
اجعل خانة الاختيار محددة بناءً على قيمة الخلية باستخدام كود VBA


اجعل خانة الاختيار محددة بناءً على قيمة الخلية باستخدام صيغة

لنفترض أنك تريد أن يتم تحديد مربع الاختيار 1 تلقائيًا عندما تكون القيمة في الخلية A1 تساوي “Test”. يرجى القيام بما يلي.

1. بعد إدراج مربع الاختيار (عنصر تحكم النموذج)، حدد مربع الاختيار واربطه بخلية محددة C2 بإدخال =C2 في شريط الصيغة.

بالنسبة لمربع التحكم ActiveX Control، يرجى النقر بزر الماوس الأيمن عليه واختيار Properties من قائمة النقر بزر الماوس الأيمن. وفي مربع الحوار Properties، أدخل الخلية المرتبطة في حقل LinkedCell، ثم أغلق مربع الحوار. انظر لقطة الشاشة:

A screenshot showing how to link a checkbox to a cell in Excel

2. حدد الخلية المرتبطة (C2)، ثم أدخل الصيغة =IF(A2="Test",TRUE,FALSE) في شريط الصيغة، ثم اضغط على مفتاح Enter.

A screenshot showing the formula to automatically check a checkbox based on a cell value in Excel

ملاحظة: في الصيغة، A2 و Test هما الخلية والقيمة التي تحتاج إلى جعل مربع الاختيار يُحدد تلقائيًا بناءً عليها.

3. عند إدخال القيمة “Test” في الخلية A1، سيتم تحديد مربع الاختيار المقابل تلقائيًا. انظر لقطة الشاشة:

A screenshot showing the checkbox automatically checked based on the cell value

ملاحظة: هذه الصيغة ليست حساسة لحالة الأحرف.


اجعل خانة الاختيار محددة بناءً على قيمة الخلية باستخدام كود VBA

يمكنك تشغيل الكود التالي لـ VBA لجعل خانة الاختيار محددة بناءً على قيمة الخلية في Excel.

1. انقر بزر الماوس الأيمن على تبويب الورقة مع خانة الاختيار المحددة بناءً على قيمة الخلية، ثم انقر فوق عرض الكود من قائمة النقر بزر الماوس الأيمن.

2. في نافذة Microsoft Visual Basic for Applications، يرجى نسخ ولصق الكود التالي لـ VBA في نافذة الكود.

كود VBA: اجعل خانة الاختيار محددة بناءً على قيمة الخلية

Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("A2").Value = "Test" Then
        ActiveSheet.CheckBoxes("Check Box 1").Value = xlOn
    Else
        ActiveSheet.CheckBoxes("Check Box 1").Value = xlOff
    End If
End Sub

ملاحظة: في الكود، A2 و Test هما الخلية والقيمة التي تحتاج إلى جعل مربع الاختيار يُحدد تلقائيًا بناءً عليها. Check Box 1 هو اسم مربع الاختيار.

3. اضغط على مفاتيح Alt + Q لإغلاق نافذة Microsoft Visual Basic for Applications.

عند إدخال القيمة “Test” في الخلية A2، سيتم تحديد مربع الاختيار المحدد تلقائيًا.

ملاحظة: هذا الكود حساس لحالة الأحرف.

نصيحة: إذا كنت ترغب في إدراج عدة مربعات اختيار في نطاق محدد بالجملة، يمكنك تجربة أداة Batch Insert Check Boxes من Kutools لـ Excel، أو إدراج عدة أزرار خيار دفعة واحدة باستخدام أداة Batch Insert Option Buttons. بالإضافة إلى ذلك، يمكنك حذف جميع مربعات الاختيار مرة واحدة باستخدام أداة Batch Delete Check Boxes كما هو موضح في لقطات الشاشة أدناه. يمكنك الانتقال إلى تنزيل Kutools لـ Excel! (30-day free trial).

A screenshot showing Kutools for Excel's Batch Insert/Delete Check Boxes utilities


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

أفضل أدوات زيادة الإنتاجية لمجموعة Office

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

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


Office Tab يجلب تجربة التبويبات إلى Office، ويجعل عملك أسهل بكثير

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